/ Macwelt 2 / Macwelt DVD 2.cdr / Audio-Video-Multimedia / macos9 / Athena CL 1.0.13 / libATH / ATHorc.py

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 09 41 54 48 6f 72 63 | 2e 70 79 00 00 00 00 00 |..ATHorc|.py.....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 50 79 74 | 68 00 00 00 00 00 00 00 |.TEXTPyt|h.......|
|00000050| 00 00 00 00 00 ad 20 00 | 00 01 1e b8 b7 d1 92 b8 |...... .|........|
|00000060| b7 d1 92 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 4e 95 00 00 |........|....N...|
|00000080| 23 20 41 54 48 6f 72 63 | 2e 70 79 0d 23 2d 2d 2d |# ATHorc|.py.#---|
|00000090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 7c 7c |--------|------|||
|000000d0| 7c 7c 7c 7c 7c 7c 7c 7c | 7c 7c 2d 2d 0d 23 20 43 ||||||||||||--.# C|
|000000e0| 6f 70 79 72 69 67 68 74 | 20 28 63 29 20 32 30 30 |opyright| (c) 200|
|000000f0| 31 20 43 68 72 69 73 74 | 6f 70 68 65 72 20 41 72 |1 Christ|opher Ar|
|00000100| 69 7a 61 2e 0d 23 20 0d | 23 20 61 74 68 65 6e 61 |iza..# .|# athena|
|00000110| 43 4c 20 63 6f 6d 65 73 | 20 77 69 74 68 20 41 42 |CL comes| with AB|
|00000120| 53 4f 4c 55 54 45 4c 59 | 20 4e 4f 20 57 41 52 52 |SOLUTELY| NO WARR|
|00000130| 41 4e 54 59 3b 0d 23 20 | 66 6f 72 20 64 65 74 61 |ANTY;.# |for deta|
|00000140| 69 6c 73 20 73 65 65 20 | 77 61 72 61 6e 74 79 20 |ils see |waranty |
|00000150| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 77 69 74 68 |informat|ion with|
|00000160| 69 6e 20 61 74 68 65 6e | 61 4f 62 6a 2e 70 79 2e |in athen|aObj.py.|
|00000170| 0d 23 20 54 68 69 73 20 | 69 73 20 66 72 65 65 20 |.# This |is free |
|00000180| 73 6f 66 74 77 61 72 65 | 2c 20 61 6e 64 20 79 6f |software|, and yo|
|00000190| 75 20 61 72 65 20 77 65 | 6c 63 6f 6d 65 20 74 6f |u are we|lcome to|
|000001a0| 20 72 65 64 69 73 74 72 | 69 62 75 74 65 20 69 74 | redistr|ibute it|
|000001b0| 20 75 6e 64 65 72 20 63 | 65 72 74 61 69 6e 20 20 | under c|ertain  |
|000001c0| 0d 23 20 63 6f 6e 64 69 | 74 69 6f 6e 73 3b 20 66 |.# condi|tions; f|
|000001d0| 6f 72 20 64 65 74 61 69 | 6c 73 20 73 65 65 20 63 |or detai|ls see c|
|000001e0| 6f 70 79 72 69 67 68 74 | 20 69 6e 66 6f 72 6d 61 |opyright| informa|
|000001f0| 74 69 6f 6e 20 77 69 74 | 68 69 6e 20 61 74 68 65 |tion wit|hin athe|
|00000200| 6e 61 4f 62 6a 2e 70 79 | 2e 0d 23 2d 2d 2d 2d 2d |naObj.py|..#-----|
|00000210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 7c 7c 7c 7c |--------|----|||||
|00000250| 7c 7c 7c 7c 7c 7c 7c 7c | 2d 2d 0d 0d 69 6d 70 6f ||||||||||--..impo|
|00000260| 72 74 20 74 69 6d 65 0d | 0d 23 2d 2d 2d 2d 2d 2d |rt time.|.#------|
|00000270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000002a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 7c 7c 7c 7c 7c |--------|---||||||
|000002b0| 7c 7c 7c 7c 7c 7c 7c 2d | 2d 0d 23 20 74 68 69 73 ||||||||-|-.# this|
|000002c0| 20 66 69 6c 65 20 69 73 | 20 61 20 63 6f 6d 62 69 | file is| a combi|
|000002d0| 6e 61 74 69 6f 6e 20 6f | 66 20 6f 72 63 2e 70 79 |nation o|f orc.py|
|000002e0| 20 61 6e 64 20 41 54 48 | 6f 72 63 2e 6f 72 63 0d | and ATH|orc.orc.|
|000002f0| 23 20 72 61 74 68 65 72 | 20 74 68 61 6e 20 75 73 |# rather| than us|
|00000300| 65 20 61 20 62 75 69 6c | 74 20 73 63 6f 72 65 2c |e a buil|t score,|
|00000310| 20 6e 6f 77 20 73 63 6f | 72 65 73 20 61 72 65 20 | now sco|res are |
|00000320| 64 79 6e 61 6d 69 63 61 | 6c 6c 79 20 63 72 65 61 |dynamica|lly crea|
|00000330| 74 65 0d 23 20 66 72 6f | 6d 20 76 65 72 73 69 6f |te.# fro|m versio|
|00000340| 6e 20 31 2e 30 2e 31 31 | 20 6f 6e 2e 0d 0d 0d 63 |n 1.0.11| on....c|
|00000350| 6c 61 73 73 20 6f 72 63 | 42 75 69 6c 64 65 72 3a |lass orc|Builder:|
|00000360| 0d 20 20 20 69 6e 73 74 | 72 4e 75 6d 62 65 72 73 |.   inst|rNumbers|
|00000370| 20 3d 20 28 32 2c 33 2c | 34 2c 35 2c 36 2c 37 2c | = (2,3,|4,5,6,7,|
|00000380| 39 2c 31 30 2c 31 31 2c | 31 32 2c 31 33 2c 32 30 |9,10,11,|12,13,20|
|00000390| 2c 32 31 2c 32 32 2c 33 | 30 2c 34 30 29 0d 0d 20 |,21,22,3|0,40).. |
|000003a0| 20 20 6f 72 63 54 69 74 | 6c 65 20 3d 20 27 3b 27 |  orcTit|le = ';'|
|000003b0| 20 2b 20 28 27 2d 27 2a | 36 35 29 20 2b 20 28 27 | + ('-'*|65) + ('|
|000003c0| 7c 27 2a 31 32 29 20 2b | 20 28 27 2d 27 2a 32 29 ||'*12) +| ('-'*2)|
|000003d0| 20 2b 20 27 5c 6e 27 20 | 2b 20 27 3b 61 74 68 65 | + '\n' |+ ';athe|
|000003e0| 6e 61 43 4c 20 6f 72 63 | 68 65 73 74 72 61 5c 6e |naCL orc|hestra\n|
|000003f0| 27 0d 20 20 20 6f 72 63 | 54 69 74 6c 65 20 3d 20 |'.   orc|Title = |
|00000400| 6f 72 63 54 69 74 6c 65 | 20 2b 20 27 3b 77 77 77 |orcTitle| + ';www|
|00000410| 2e 66 6c 65 78 61 74 6f | 6e 65 2e 63 6f 6d 2f 61 |.flexato|ne.com/a|
|00000420| 74 68 65 6e 61 43 4c 5c | 6e 27 0d 20 20 20 6f 72 |thenaCL\|n'.   or|
|00000430| 63 54 69 74 6c 65 20 3d | 20 6f 72 63 54 69 74 6c |cTitle =| orcTitl|
|00000440| 65 20 2b 20 27 3b 6f 72 | 63 68 65 73 74 72 61 20 |e + ';or|chestra |
|00000450| 63 72 65 61 74 65 64 20 | 6f 6e 3a 20 25 72 5c 6e |created |on: %r\n|
|00000460| 27 20 25 20 74 69 6d 65 | 2e 61 73 63 74 69 6d 65 |' % time|.asctime|
|00000470| 28 74 69 6d 65 2e 6c 6f | 63 61 6c 74 69 6d 65 28 |(time.lo|caltime(|
|00000480| 74 69 6d 65 2e 74 69 6d | 65 28 29 29 29 0d 20 20 |time.tim|e())).  |
|00000490| 20 6f 72 63 54 69 74 6c | 65 20 3d 20 6f 72 63 54 | orcTitl|e = orcT|
|000004a0| 69 74 6c 65 20 2b 20 27 | 3b 27 20 2b 20 28 27 2d |itle + '|;' + ('-|
|000004b0| 27 2a 36 35 29 20 2b 20 | 28 27 7c 27 2a 31 32 29 |'*65) + |('|'*12)|
|000004c0| 20 2b 20 28 27 2d 27 2a | 32 29 20 2b 20 27 5c 6e | + ('-'*|2) + '\n|
|000004d0| 27 20 2b 20 27 3b 61 74 | 68 65 6e 61 43 4c 20 6f |' + ';at|henaCL o|
|000004e0| 72 63 68 65 73 74 72 61 | 5c 6e 27 0d 0d 20 20 20 |rchestra|\n'..   |
|000004f0| 6f 72 63 48 65 61 64 65 | 72 4d 6f 6e 6f 20 3d 20 |orcHeade|rMono = |
|00000500| 27 27 27 0d 73 72 20 20 | 20 20 20 3d 20 34 34 31 |'''.sr  |   = 441|
|00000510| 30 30 0d 6b 72 20 20 20 | 20 20 3d 20 34 34 31 30 |00.kr   |  = 4410|
|00000520| 0d 6b 73 6d 70 73 20 20 | 3d 20 31 30 0d 6e 63 68 |.ksmps  |= 10.nch|
|00000530| 6e 6c 73 20 3d 20 31 0d | 27 27 27 0d 20 20 20 6f |nls = 1.|'''.   o|
|00000540| 72 63 48 65 61 64 65 72 | 53 74 65 72 65 6f 20 3d |rcHeader|Stereo =|
|00000550| 20 27 27 27 0d 73 72 20 | 20 20 20 20 3d 20 34 34 | '''.sr |    = 44|
|00000560| 31 30 30 0d 6b 72 20 20 | 20 20 20 3d 20 34 34 31 |100.kr  |   = 441|
|00000570| 30 0d 6b 73 6d 70 73 20 | 20 3d 20 31 30 0d 6e 63 |0.ksmps | = 10.nc|
|00000580| 68 6e 6c 73 20 3d 20 32 | 0d 27 27 27 0d 20 20 20 |hnls = 2|.'''.   |
|00000590| 6f 72 63 48 65 61 64 65 | 72 51 75 61 64 20 3d 20 |orcHeade|rQuad = |
|000005a0| 27 27 27 0d 73 72 20 20 | 20 20 20 3d 20 34 34 31 |'''.sr  |   = 441|
|000005b0| 30 30 0d 6b 72 20 20 20 | 20 20 3d 20 34 34 31 30 |00.kr   |  = 4410|
|000005c0| 0d 6b 73 6d 70 73 20 20 | 3d 20 31 30 0d 6e 63 68 |.ksmps  |= 10.nch|
|000005d0| 6e 6c 73 20 3d 20 34 0d | 27 27 27 0d 20 20 20 73 |nls = 4.|'''.   s|
|000005e0| 63 6f 46 74 61 62 6c 65 | 73 20 3d 20 27 27 27 0d |coFtable|s = '''.|
|000005f0| 3b 66 2d 74 61 62 6c 65 | 73 0d 20 20 20 66 31 20 |;f-table|s.   f1 |
|00000600| 20 30 20 34 30 39 36 20 | 20 31 30 20 31 20 20 20 | 0 4096 | 10 1   |
|00000610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000620| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000630| 20 20 20 20 20 20 3b 20 | 73 69 6e 65 20 77 61 76 |      ; |sine wav|
|00000640| 65 0d 20 20 20 66 32 20 | 20 30 20 31 30 32 35 20 |e.   f2 | 0 1025 |
|00000650| 20 20 35 20 31 20 31 30 | 32 34 20 2e 30 30 32 20 |  5 1 10|24 .002 |
|00000660| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000670| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 |        |      ; |
|00000680| 72 69 73 73 65 74 20 62 | 65 6c 6c 0d 20 20 20 66 |risset b|ell.   f|
|00000690| 33 20 20 30 20 31 36 33 | 38 34 20 31 30 20 31 20 |3  0 163|84 10 1 |
|000006a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000006b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000006c0| 20 20 20 20 20 20 20 20 | 3b 20 72 69 73 73 65 74 |        |; risset|
|000006d0| 20 62 65 6c 6c 0d 20 20 | 20 66 34 20 20 30 20 32 | bell.  | f4  0 2|
|000006e0| 30 34 38 20 20 31 30 20 | 31 20 2e 35 20 2e 33 20 |048  10 |1 .5 .3 |
|000006f0| 2e 32 35 20 2e 32 20 2e | 31 36 37 20 2e 31 34 20 |.25 .2 .|167 .14 |
|00000700| 2e 31 32 35 20 2e 31 31 | 31 20 20 20 20 20 20 20 |.125 .11|1       |
|00000710| 20 20 3b 20 53 61 77 74 | 6f 6f 74 68 20 0d 20 20 |  ; Sawt|ooth .  |
|00000720| 20 66 35 20 20 30 20 32 | 30 34 38 20 20 31 30 20 | f5  0 2|048  10 |
|00000730| 31 20 30 20 20 2e 33 20 | 20 30 20 20 20 2e 32 20 |1 0  .3 | 0   .2 |
|00000740| 20 30 20 20 2e 31 34 20 | 20 30 20 20 20 2e 31 31 | 0  .14 | 0   .11|
|00000750| 31 20 20 20 20 20 20 20 | 20 20 3b 20 53 71 75 61 |1       |  ; Squa|
|00000760| 72 65 0d 20 20 20 66 36 | 20 20 30 20 32 30 34 38 |re.   f6|  0 2048|
|00000770| 20 20 31 30 20 31 20 31 | 20 31 20 31 20 2e 37 20 |  10 1 1| 1 1 .7 |
|00000780| 2e 35 20 2e 33 20 2e 31 | 20 20 20 20 20 20 20 20 |.5 .3 .1|        |
|00000790| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |        |       ;|
|000007a0| 20 50 75 6c 73 65 0d 20 | 20 20 66 37 20 20 30 20 | Pulse. |  f7  0 |
|000007b0| 32 30 34 38 20 20 31 39 | 20 2e 35 20 31 20 32 37 |2048  19| .5 1 27|
|000007c0| 30 20 31 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 1     |        |
|000007d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000007e0| 20 20 20 3b 20 73 69 67 | 6d 6f 69 64 20 72 69 73 |   ; sig|moid ris|
|000007f0| 65 0d 20 20 20 66 38 20 | 20 30 20 34 30 39 37 20 |e.   f8 | 0 4097 |
|00000800| 20 37 20 30 20 31 30 30 | 20 2e 31 20 33 30 30 20 | 7 0 100| .1 300 |
|00000810| 33 20 36 30 30 20 31 20 | 33 30 30 30 20 2e 30 31 |3 600 1 |3000 .01|
|00000820| 20 39 36 20 30 20 20 20 | 20 20 20 20 20 20 3b 20 | 96 0   |      ; |
|00000830| 62 75 7a 7a 20 66 2d 63 | 61 72 64 0d 20 20 20 66 |buzz f-c|ard.   f|
|00000840| 39 20 20 30 20 32 35 36 | 20 20 20 31 30 20 31 20 |9  0 256|   10 1 |
|00000850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000860| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000870| 20 20 20 20 20 20 20 20 | 3b 20 6c 6f 77 20 72 65 |        |; low re|
|00000880| 7a 20 73 69 6e 65 0d 20 | 20 20 66 31 33 20 30 20 |z sine. |  f13 0 |
|00000890| 31 30 32 34 20 20 38 20 | 2d 2e 38 20 34 32 20 2d |1024  8 |-.8 42 -|
|000008a0| 2e 37 38 20 20 34 30 30 | 20 2d 2e 37 20 31 34 30 |.78  400| -.7 140|
|000008b0| 20 2e 37 20 20 34 30 30 | 20 2e 37 38 20 34 32 20 | .7  400| .78 42 |
|000008c0| 2e 38 20 3b 20 64 69 73 | 74 6f 72 74 69 6f 6e 20 |.8 ; dis|tortion |
|000008d0| 74 61 62 6c 65 0d 0d 3b | 66 2d 74 61 62 6c 65 73 |table..;|f-tables|
|000008e0| 2d 2d 69 32 30 0d 20 20 | 20 3b 65 78 70 6f 6e 65 |--i20.  | ;expone|
|000008f0| 6e 74 69 61 6c 6c 79 20 | 64 65 63 61 79 69 6e 67 |ntially |decaying|
|00000900| 20 61 6d 70 6c 69 74 75 | 64 65 20 65 6e 76 65 6c | amplitu|de envel|
|00000910| 6f 70 65 20 66 6f 72 20 | 63 61 72 72 69 65 72 20 |ope for |carrier |
|00000920| 73 69 67 6e 61 6c 0d 20 | 20 20 66 32 30 31 20 20 |signal. |  f201  |
|00000930| 20 20 20 20 30 20 20 20 | 20 20 20 20 35 31 32 20 |    0   |    512 |
|00000940| 20 20 20 20 35 20 20 20 | 20 20 20 20 31 20 20 20 |    5   |    1   |
|00000950| 35 31 32 20 20 2e 30 30 | 31 20 20 20 20 20 0d 20 |512  .00|1     . |
|00000960| 20 20 3b 61 6d 70 6c 69 | 74 75 64 65 20 65 6e 76 |  ;ampli|tude env|
|00000970| 65 6c 6f 70 65 20 66 6f | 72 20 66 72 65 71 75 65 |elope fo|r freque|
|00000980| 6e 63 79 20 6d 6f 64 75 | 6c 61 74 69 6f 6e 20 20 |ncy modu|lation  |
|00000990| 20 20 0d 20 20 20 66 32 | 30 32 20 20 20 20 20 20 |  .   f2|02      |
|000009a0| 30 20 20 20 20 20 20 20 | 35 31 32 20 20 20 20 20 |0       |512     |
|000009b0| 37 20 20 20 20 20 20 20 | 31 20 20 20 36 34 20 20 |7       |1   64  |
|000009c0| 20 20 30 20 20 20 20 34 | 34 38 20 20 30 20 20 0d |  0    4|48  0  .|
|000009d0| 20 20 20 3b 77 61 76 65 | 66 6f 72 6d 20 6f 66 20 |   ;wave|form of |
|000009e0| 63 61 72 72 69 65 72 20 | 73 69 67 6e 61 6c 20 20 |carrier |signal  |
|000009f0| 20 0d 20 20 20 66 32 30 | 33 20 20 20 20 20 20 30 | .   f20|3      0|
|00000a00| 20 20 20 20 20 20 20 35 | 31 32 20 20 20 20 20 39 |       5|12     9|
|00000a10| 20 20 20 20 20 20 20 31 | 20 20 20 31 20 20 20 20 |       1|   1    |
|00000a20| 20 30 20 20 20 20 20 20 | 20 20 20 20 20 20 0d 0d | 0      |      ..|
|00000a30| 3b 66 2d 74 61 62 6c 65 | 73 2d 2d 69 32 31 0d 20 |;f-table|s--i21. |
|00000a40| 20 20 66 32 31 30 20 30 | 20 20 35 31 32 20 20 31 |  f210 0|  512  1|
|00000a50| 30 20 20 31 20 20 20 20 | 20 20 20 20 20 20 20 20 |0  1    |        |
|00000a60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a70| 3b 20 63 61 72 72 69 65 | 72 73 0d 20 20 20 66 32 |; carrie|rs.   f2|
|00000a80| 31 31 20 30 20 31 30 32 | 34 20 20 35 20 20 2e 30 |11 0 102|4  5  .0|
|00000a90| 30 30 31 20 32 30 30 20 | 31 20 36 37 34 20 31 20 |001 200 |1 674 1 |
|00000aa0| 31 35 30 20 2e 30 30 30 | 31 20 20 20 3b 20 61 6d |150 .000|1   ; am|
|00000ab0| 70 6c 69 74 75 64 65 20 | 65 6e 76 65 6c 6f 70 65 |plitude |envelope|
|00000ac0| 0d 20 20 20 66 32 31 32 | 20 30 20 31 30 32 34 20 |.   f212| 0 1024 |
|00000ad0| 20 35 20 20 31 20 31 30 | 32 34 20 2e 30 30 30 31 | 5  1 10|24 .0001|
|00000ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000af0| 20 20 3b 20 69 6e 64 65 | 78 20 65 6e 76 65 6c 6f |  ; inde|x envelo|
|00000b00| 70 65 0d 0d 3b 66 2d 74 | 61 62 6c 65 73 2d 2d 69 |pe..;f-t|ables--i|
|00000b10| 32 32 0d 20 20 20 66 32 | 33 31 20 30 20 35 31 32 |22.   f2|31 0 512|
|00000b20| 20 37 20 20 20 31 20 20 | 36 34 20 20 30 20 20 20 | 7   1  |64  0   |
|00000b30| 34 34 38 20 20 30 20 20 | 20 20 20 20 20 20 20 20 |448  0  |        |
|00000b40| 20 20 20 20 3b 20 69 6e | 64 65 78 20 65 6e 76 65 |    ; in|dex enve|
|00000b50| 6c 6f 70 65 0d 20 20 20 | 66 32 35 31 20 30 20 35 |lope.   |f251 0 5|
|00000b60| 31 33 20 35 20 20 2e 38 | 20 20 31 31 33 20 31 20 |13 5  .8|  113 1 |
|00000b70| 20 20 31 30 20 20 20 31 | 20 33 39 30 20 2e 30 30 |  10   1| 390 .00|
|00000b80| 30 31 20 20 20 20 3b 20 | 61 6d 70 6c 69 74 75 64 |01    ; |amplitud|
|00000b90| 65 20 65 6e 76 65 6c 6f | 70 65 0d 27 27 27 0d 0d |e envelo|pe.'''..|
|00000ba0| 0d 20 20 20 23 20 69 6e | 73 74 72 4f 62 6a 44 69 |.   # in|strObjDi|
|00000bb0| 63 74 20 69 73 20 62 75 | 69 6c 74 20 66 6f 72 20 |ct is bu|ilt for |
|00000bc0| 65 61 63 68 20 63 6f 6d | 6d 61 6e 64 3a 20 62 61 |each com|mand: ba|
|00000bd0| 64 3f 21 0d 20 20 20 64 | 65 66 20 63 6f 6e 73 74 |d?!.   d|ef const|
|00000be0| 72 75 63 74 4f 72 63 28 | 73 65 6c 66 2c 20 6e 6f |ructOrc(|self, no|
|00000bf0| 43 68 61 6e 6e 65 6c 73 | 3d 32 29 3a 0d 20 20 20 |Channels|=2):.   |
|00000c00| 20 20 20 73 65 6c 66 2e | 6f 72 63 20 3d 20 73 65 |   self.|orc = se|
|00000c10| 6c 66 2e 6f 72 63 54 69 | 74 6c 65 0d 20 20 20 20 |lf.orcTi|tle.    |
|00000c20| 20 20 73 65 6c 66 2e 6e | 6f 43 68 61 6e 6e 65 6c |  self.n|oChannel|
|00000c30| 73 20 3d 20 6e 6f 43 68 | 61 6e 6e 65 6c 73 0d 20 |s = noCh|annels. |
|00000c40| 20 20 20 20 20 69 66 20 | 73 65 6c 66 2e 6e 6f 43 |     if |self.noC|
|00000c50| 68 61 6e 6e 65 6c 73 20 | 20 20 3d 3d 20 31 3a 0d |hannels |  == 1:.|
|00000c60| 20 20 20 20 20 20 20 20 | 20 73 65 6c 66 2e 6f 72 |        | self.or|
|00000c70| 63 20 20 3d 20 73 65 6c | 66 2e 6f 72 63 20 20 2b |c  = sel|f.orc  +|
|00000c80| 20 73 65 6c 66 2e 6f 72 | 63 48 65 61 64 65 72 4d | self.or|cHeaderM|
|00000c90| 6f 6e 6f 0d 20 20 20 20 | 20 20 65 6c 69 66 20 73 |ono.    |  elif s|
|00000ca0| 65 6c 66 2e 6e 6f 43 68 | 61 6e 6e 65 6c 73 20 3d |elf.noCh|annels =|
|00000cb0| 3d 20 32 3a 0d 20 20 20 | 20 20 20 20 20 20 73 65 |= 2:.   |      se|
|00000cc0| 6c 66 2e 6f 72 63 20 20 | 3d 20 73 65 6c 66 2e 6f |lf.orc  |= self.o|
|00000cd0| 72 63 20 20 2b 20 73 65 | 6c 66 2e 6f 72 63 48 65 |rc  + se|lf.orcHe|
|00000ce0| 61 64 65 72 53 74 65 72 | 65 6f 0d 20 20 20 20 20 |aderSter|eo.     |
|00000cf0| 20 65 6c 69 66 20 73 65 | 6c 66 2e 6e 6f 43 68 61 | elif se|lf.noCha|
|00000d00| 6e 6e 65 6c 73 20 3d 3d | 20 34 3a 0d 20 20 20 20 |nnels ==| 4:.    |
|00000d10| 20 20 20 20 20 73 65 6c | 66 2e 6f 72 63 20 20 3d |     sel|f.orc  =|
|00000d20| 20 73 65 6c 66 2e 6f 72 | 63 20 20 2b 20 73 65 6c | self.or|c  + sel|
|00000d30| 66 2e 6f 72 63 48 65 61 | 64 65 72 51 75 61 64 0d |f.orcHea|derQuad.|
|00000d40| 20 20 20 20 20 20 73 65 | 6c 66 2e 69 6e 73 74 72 |      se|lf.instr|
|00000d50| 4f 62 6a 44 69 63 74 20 | 3d 20 7b 7d 0d 20 20 20 |ObjDict |= {}.   |
|00000d60| 20 20 20 66 6f 72 20 6e | 75 6d 62 65 72 20 69 6e |   for n|umber in|
|00000d70| 20 73 65 6c 66 2e 69 6e | 73 74 72 4e 75 6d 62 65 | self.in|strNumbe|
|00000d80| 72 73 3a 0d 20 20 20 20 | 20 20 20 20 20 73 65 6c |rs:.    |     sel|
|00000d90| 66 2e 69 6e 73 74 72 4f | 62 6a 44 69 63 74 5b 28 |f.instrO|bjDict[(|
|00000da0| 27 69 25 69 27 20 25 20 | 6e 75 6d 62 65 72 29 5d |'i%i' % |number)]|
|00000db0| 20 3d 20 65 76 61 6c 28 | 28 27 69 6e 73 74 72 25 | = eval(|('instr%|
|00000dc0| 69 28 29 27 20 25 20 6e | 75 6d 62 65 72 29 29 0d |i()' % n|umber)).|
|00000dd0| 20 20 20 20 20 20 20 20 | 20 69 6e 73 74 72 4f 62 |        | instrOb|
|00000de0| 6a 20 3d 20 73 65 6c 66 | 2e 69 6e 73 74 72 4f 62 |j = self|.instrOb|
|00000df0| 6a 44 69 63 74 5b 28 27 | 69 25 69 27 20 25 20 6e |jDict[('|i%i' % n|
|00000e00| 75 6d 62 65 72 29 5d 0d | 20 20 20 20 20 20 20 20 |umber)].|        |
|00000e10| 20 73 65 6c 66 2e 6f 72 | 63 20 3d 20 73 65 6c 66 | self.or|c = self|
|00000e20| 2e 6f 72 63 20 2b 20 69 | 6e 73 74 72 4f 62 6a 2e |.orc + i|nstrObj.|
|00000e30| 62 75 69 6c 64 49 6e 73 | 74 72 44 65 66 28 6e 6f |buildIns|trDef(no|
|00000e40| 43 68 61 6e 6e 65 6c 73 | 29 0d 20 20 20 20 20 20 |Channels|).      |
|00000e50| 72 65 74 75 72 6e 20 73 | 65 6c 66 2e 6f 72 63 0d |return s|elf.orc.|
|00000e60| 0d 20 20 20 64 65 66 20 | 63 6c 65 61 72 4f 72 63 |.   def |clearOrc|
|00000e70| 28 73 65 6c 66 2c 20 6e | 6f 43 68 61 6e 6e 65 6c |(self, n|oChannel|
|00000e80| 73 29 3a 0d 20 20 20 20 | 20 20 69 66 20 73 65 6c |s):.    |  if sel|
|00000e90| 66 2e 69 6e 73 74 72 4f | 62 6a 44 69 63 74 3a 0d |f.instrO|bjDict:.|
|00000ea0| 20 20 20 20 20 20 20 20 | 20 64 65 6c 20 73 65 6c |        | del sel|
|00000eb0| 66 2e 69 6e 73 74 72 4f | 62 6a 44 69 63 74 0d 0d |f.instrO|bjDict..|
|00000ec0| 20 20 20 64 65 66 20 67 | 65 74 49 6e 73 74 72 49 |   def g|etInstrI|
|00000ed0| 6e 66 6f 28 73 65 6c 66 | 29 3a 0d 20 20 20 20 20 |nfo(self|):.     |
|00000ee0| 20 27 72 65 74 75 72 6e | 73 20 61 20 64 69 63 74 | 'return|s a dict|
|00000ef0| 69 6f 6e 61 72 79 20 6f | 66 20 69 6e 73 74 72 4e |ionary o|f instrN|
|00000f00| 6f 20 3a 20 28 4e 61 6d | 65 2c 20 70 4e 6f 29 27 |o : (Nam|e, pNo)'|
|00000f10| 0d 20 20 20 20 20 20 73 | 65 6c 66 2e 69 6e 73 74 |.      s|elf.inst|
|00000f20| 72 4f 62 6a 44 69 63 74 | 20 3d 20 7b 7d 0d 20 20 |rObjDict| = {}.  |
|00000f30| 20 20 20 20 69 6e 73 74 | 49 6e 66 6f 44 69 63 74 |    inst|InfoDict|
|00000f40| 20 3d 20 7b 7d 0d 20 20 | 20 20 20 20 66 6f 72 20 | = {}.  |    for |
|00000f50| 6e 75 6d 62 65 72 20 69 | 6e 20 73 65 6c 66 2e 69 |number i|n self.i|
|00000f60| 6e 73 74 72 4e 75 6d 62 | 65 72 73 3a 0d 20 20 20 |nstrNumb|ers:.   |
|00000f70| 20 20 20 20 20 20 73 65 | 6c 66 2e 69 6e 73 74 72 |      se|lf.instr|
|00000f80| 4f 62 6a 44 69 63 74 5b | 28 27 69 25 69 27 20 25 |ObjDict[|('i%i' %|
|00000f90| 20 6e 75 6d 62 65 72 29 | 5d 20 3d 20 65 76 61 6c | number)|] = eval|
|00000fa0| 28 28 27 69 6e 73 74 72 | 25 69 28 29 27 20 25 20 |(('instr|%i()' % |
|00000fb0| 6e 75 6d 62 65 72 29 29 | 0d 20 20 20 20 20 20 20 |number))|.       |
|00000fc0| 20 20 69 6e 73 74 72 4f | 62 6a 20 3d 20 73 65 6c |  instrO|bj = sel|
|00000fd0| 66 2e 69 6e 73 74 72 4f | 62 6a 44 69 63 74 5b 28 |f.instrO|bjDict[(|
|00000fe0| 27 69 25 69 27 20 25 20 | 6e 75 6d 62 65 72 29 5d |'i%i' % |number)]|
|00000ff0| 0d 20 20 20 20 20 20 20 | 20 20 69 6e 73 74 49 6e |.       |  instIn|
|00001000| 66 6f 44 69 63 74 5b 6e | 75 6d 62 65 72 5d 20 3d |foDict[n|umber] =|
|00001010| 20 28 69 6e 73 74 72 4f | 62 6a 2e 6e 61 6d 65 2c | (instrO|bj.name,|
|00001020| 20 69 6e 73 74 72 4f 62 | 6a 2e 70 6d 74 72 46 69 | instrOb|j.pmtrFi|
|00001030| 65 6c 64 73 29 0d 20 20 | 20 20 20 20 72 65 74 75 |elds).  |    retu|
|00001040| 72 6e 20 69 6e 73 74 49 | 6e 66 6f 44 69 63 74 0d |rn instI|nfoDict.|
|00001050| 0d 20 20 20 64 65 66 20 | 67 65 74 49 6e 73 74 72 |.   def |getInstr|
|00001060| 50 72 65 73 65 74 28 73 | 65 6c 66 2c 20 69 4e 6f |Preset(s|elf, iNo|
|00001070| 29 3a 0d 20 20 20 20 20 | 20 27 72 65 74 75 72 6e |):.     | 'return|
|00001080| 73 20 61 20 64 69 63 74 | 69 6f 6e 61 72 79 20 6f |s a dict|ionary o|
|00001090| 66 20 64 65 66 61 75 6c | 74 20 76 61 6c 75 65 73 |f defaul|t values|
|000010a0| 27 0d 20 20 20 20 20 20 | 69 6e 73 74 72 4f 62 6a |'.      |instrObj|
|000010b0| 65 63 74 20 3d 20 65 76 | 61 6c 28 28 27 69 6e 73 |ect = ev|al(('ins|
|000010c0| 74 72 25 69 28 29 27 20 | 25 20 69 4e 6f 29 29 0d |tr%i()' |% iNo)).|
|000010d0| 20 20 20 20 20 20 70 72 | 65 73 65 74 44 69 63 74 |      pr|esetDict|
|000010e0| 20 3d 20 69 6e 73 74 72 | 4f 62 6a 65 63 74 2e 67 | = instr|Object.g|
|000010f0| 65 74 50 72 65 73 65 74 | 44 69 63 74 28 29 0d 20 |etPreset|Dict(). |
|00001100| 20 20 20 20 20 72 65 74 | 75 72 6e 20 70 72 65 73 |     ret|urn pres|
|00001110| 65 74 44 69 63 74 0d 0d | 20 20 20 64 65 66 20 67 |etDict..|   def g|
|00001120| 65 74 49 6e 73 74 72 4e | 61 6d 65 28 73 65 6c 66 |etInstrN|ame(self|
|00001130| 2c 20 69 4e 6f 29 3a 0d | 20 20 20 20 20 20 27 72 |, iNo):.|      'r|
|00001140| 65 74 75 72 6e 73 20 61 | 20 64 69 63 74 69 6f 6e |eturns a| diction|
|00001150| 61 72 79 20 6f 66 20 64 | 65 66 61 75 6c 74 20 76 |ary of d|efault v|
|00001160| 61 6c 75 65 73 27 0d 20 | 20 20 20 20 20 69 6e 73 |alues'. |     ins|
|00001170| 74 72 4f 62 6a 65 63 74 | 20 3d 20 65 76 61 6c 28 |trObject| = eval(|
|00001180| 28 27 69 6e 73 74 72 25 | 69 28 29 27 20 25 20 69 |('instr%|i()' % i|
|00001190| 4e 6f 29 29 0d 20 20 20 | 20 20 20 72 65 74 75 72 |No)).   |   retur|
|000011a0| 6e 20 69 6e 73 74 72 4f | 62 6a 65 63 74 2e 6e 61 |n instrO|bject.na|
|000011b0| 6d 65 0d 0d 23 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |me..#---|--------|
|000011c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011f0| 2d 2d 2d 2d 2d 2d 7c 7c | 7c 7c 7c 7c 7c 7c 7c 7c |------||||||||||||
|00001200| 7c 7c 2d 2d 0d 63 6c 61 | 73 73 20 69 6e 73 74 72 |||--.cla|ss instr|
|00001210| 53 68 65 6c 6c 3a 0d 20 | 20 20 23 20 6f 75 74 70 |Shell:. |  # outp|
|00001220| 75 74 73 20 65 78 70 65 | 63 74 20 61 6e 64 20 69 |uts expe|ct and i|
|00001230| 6e 73 74 72 75 6d 65 6e | 74 20 74 6f 20 68 61 76 |nstrumen|t to hav|
|00001240| 65 20 61 20 73 69 6e 67 | 6c 65 20 66 69 6e 61 6c |e a sing|le final|
|00001250| 20 73 69 67 6e 61 6c 2c | 20 63 61 6c 6c 64 20 22 | signal,| calld "|
|00001260| 61 4d 69 78 53 69 67 0d | 20 20 20 23 20 74 68 69 |aMixSig.|   # thi|
|00001270| 73 20 62 69 74 20 6f 66 | 20 63 6f 64 65 73 20 67 |s bit of| codes g|
|00001280| 65 74 73 20 61 70 70 65 | 6e 64 65 64 20 74 6f 20 |ets appe|nded to |
|00001290| 65 6e 64 20 6f 66 20 69 | 6e 73 74 20 64 65 66 0d |end of i|nst def.|
|000012a0| 20 20 20 6d 6f 6e 6f 4f | 75 74 70 75 74 20 3d 20 |   monoO|utput = |
|000012b0| 27 27 27 0d 20 20 20 3b | 2d 2d 73 74 65 72 65 6f |'''.   ;|--stereo|
|000012c0| 20 70 61 6e 6e 69 6e 67 | 20 61 72 6f 75 6e 64 20 | panning| around |
|000012d0| 39 30 20 64 65 67 72 65 | 65 73 0d 20 20 20 6f 75 |90 degre|es.   ou|
|000012e0| 74 20 20 20 20 20 20 20 | 20 20 20 20 20 20 61 4d |t       |      aM|
|000012f0| 69 78 53 69 67 0d 20 20 | 20 65 6e 64 69 6e 0d 27 |ixSig.  | endin.'|
|00001300| 27 27 0d 20 20 20 73 74 | 65 72 65 6f 4f 75 74 70 |''.   st|ereoOutp|
|00001310| 75 74 20 3d 20 27 27 27 | 0d 20 20 20 3b 2d 2d 73 |ut = '''|.   ;--s|
|00001320| 74 65 72 65 6f 20 70 61 | 6e 6e 69 6e 67 20 61 72 |tereo pa|nning ar|
|00001330| 6f 75 6e 64 20 39 30 20 | 64 65 67 72 65 65 73 0d |ound 90 |degrees.|
|00001340| 20 20 20 69 43 69 72 63 | 6c 65 50 61 6e 20 20 20 |   iCirc|lePan   |
|00001350| 20 20 20 3d 20 39 30 2e | 30 20 2a 20 69 70 61 6e |   = 90.|0 * ipan|
|00001360| 20 20 20 20 20 20 20 20 | 20 3b 20 73 63 61 6c 65 |        | ; scale|
|00001370| 20 39 30 20 77 69 74 68 | 20 76 61 6c 75 65 73 20 | 90 with| values |
|00001380| 66 72 6f 6d 20 30 20 74 | 6f 20 31 0d 20 20 20 6b |from 0 t|o 1.   k|
|00001390| 64 65 67 72 65 65 20 20 | 20 20 20 20 20 20 20 6c |degree  |       l|
|000013a0| 69 6e 65 20 20 20 20 20 | 20 69 43 69 72 63 6c 65 |ine     | iCircle|
|000013b0| 50 61 6e 2c 20 70 33 2c | 20 69 43 69 72 63 6c 65 |Pan, p3,| iCircle|
|000013c0| 50 61 6e 0d 20 20 20 6b | 64 69 73 74 61 6e 63 65 |Pan.   k|distance|
|000013d0| 20 20 20 20 20 20 20 6c | 69 6e 65 20 20 20 20 20 |       l|ine     |
|000013e0| 20 31 2c 20 70 33 2c 20 | 31 20 20 20 20 3b 20 75 | 1, p3, |1    ; u|
|000013f0| 73 65 64 20 74 6f 20 64 | 69 73 74 61 6e 63 65 20 |sed to d|istance |
|00001400| 72 65 76 65 72 62 2c 20 | 6e 65 65 64 20 61 20 63 |reverb, |need a c|
|00001410| 6f 6e 73 74 61 6e 74 20 | 31 0d 20 20 20 61 73 69 |onstant |1.   asi|
|00001420| 67 31 2c 20 61 73 69 67 | 32 20 20 20 20 6c 6f 63 |g1, asig|2    loc|
|00001430| 73 69 67 20 20 20 20 61 | 4d 69 78 53 69 67 2c 20 |sig    a|MixSig, |
|00001440| 6b 64 65 67 72 65 65 2c | 20 6b 64 69 73 74 61 6e |kdegree,| kdistan|
|00001450| 63 65 2c 20 30 2e 30 0d | 20 20 20 6f 75 74 73 20 |ce, 0.0.|   outs |
|00001460| 20 20 20 20 20 20 20 20 | 20 20 20 61 73 69 67 31 |        |   asig1|
|00001470| 2c 20 61 73 69 67 32 0d | 20 20 20 65 6e 64 69 6e |, asig2.|   endin|
|00001480| 0d 27 27 27 0d 20 20 20 | 71 75 61 64 4f 75 74 70 |.'''.   |quadOutp|
|00001490| 75 74 20 3d 20 27 27 27 | 0d 20 20 20 3b 2d 2d 71 |ut = '''|.   ;--q|
|000014a0| 75 61 64 20 70 61 6e 6e | 69 6e 67 20 61 72 6f 75 |uad pann|ing arou|
|000014b0| 6e 64 20 33 36 30 20 64 | 65 67 72 65 65 73 0d 20 |nd 360 d|egrees. |
|000014c0| 20 20 69 43 69 72 63 6c | 65 50 61 6e 20 20 20 20 |  iCircl|ePan    |
|000014d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3d 20 |        |      = |
|000014e0| 33 36 30 2e 30 20 2a 20 | 69 70 61 6e 20 20 20 20 |360.0 * |ipan    |
|000014f0| 20 20 20 20 20 3b 20 73 | 63 61 6c 65 20 39 30 20 |     ; s|cale 90 |
|00001500| 77 69 74 68 20 76 61 6c | 75 65 73 20 66 72 6f 6d |with val|ues from|
|00001510| 20 30 20 74 6f 20 31 0d | 20 20 20 6b 64 65 67 72 | 0 to 1.|   kdegr|
|00001520| 65 65 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ee      |        |
|00001530| 20 20 20 20 20 20 20 6c | 69 6e 65 20 20 20 20 20 |       l|ine     |
|00001540| 20 69 43 69 72 63 6c 65 | 50 61 6e 2c 20 70 33 2c | iCircle|Pan, p3,|
|00001550| 20 69 43 69 72 63 6c 65 | 50 61 6e 0d 20 20 20 6b | iCircle|Pan.   k|
|00001560| 64 69 73 74 61 6e 63 65 | 20 20 20 20 20 20 20 20 |distance|        |
|00001570| 20 20 20 20 20 20 20 20 | 20 20 20 6c 69 6e 65 20 |        |   line |
|00001580| 20 20 20 20 20 31 2c 20 | 70 33 2c 20 31 20 20 20 |     1, |p3, 1   |
|00001590| 20 3b 20 75 73 65 64 20 | 74 6f 20 64 69 73 74 61 | ; used |to dista|
|000015a0| 6e 63 65 20 72 65 76 65 | 72 62 2c 20 6e 65 65 64 |nce reve|rb, need|
|000015b0| 20 61 20 63 6f 6e 73 74 | 61 6e 74 20 31 0d 20 20 | a const|ant 1.  |
|000015c0| 20 61 73 69 67 31 2c 20 | 61 73 69 67 32 2c 20 61 | asig1, |asig2, a|
|000015d0| 73 69 67 33 2c 20 61 73 | 69 67 34 20 20 6c 6f 63 |sig3, as|ig4  loc|
|000015e0| 73 69 67 20 20 20 20 61 | 4d 69 78 53 69 67 2c 20 |sig    a|MixSig, |
|000015f0| 6b 64 65 67 72 65 65 2c | 20 6b 64 69 73 74 61 6e |kdegree,| kdistan|
|00001600| 63 65 2c 20 30 2e 30 0d | 20 20 20 6f 75 74 71 20 |ce, 0.0.|   outq |
|00001610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001620| 20 20 20 20 20 20 20 61 | 73 69 67 31 2c 20 61 73 |       a|sig1, as|
|00001630| 69 67 32 2c 20 61 73 69 | 67 33 2c 20 61 73 69 67 |ig2, asi|g3, asig|
|00001640| 34 0d 20 20 20 65 6e 64 | 69 6e 0d 27 27 27 0d 20 |4.   end|in.'''. |
|00001650| 20 20 23 20 64 65 66 69 | 6e 65 64 20 69 6e 20 65 |  # defi|ned in e|
|00001660| 61 63 68 20 73 75 62 2d | 63 6c 61 73 73 65 64 20 |ach sub-|classed |
|00001670| 69 6e 73 74 72 75 6d 65 | 6e 74 0d 20 20 20 23 69 |instrume|nt.   #i|
|00001680| 6e 75 6d 62 65 72 20 20 | 20 20 20 3d 20 31 32 0d |number  |   = 12.|
|00001690| 20 20 20 23 6e 61 6d 65 | 20 20 20 20 20 20 20 3d |   #name|       =|
|000016a0| 20 27 6e 6f 69 73 65 46 | 69 6c 74 65 72 65 64 27 | 'noiseF|iltered'|
|000016b0| 0d 20 20 20 23 69 6e 66 | 6f 20 20 20 20 20 20 20 |.   #inf|o       |
|000016c0| 3d 20 27 41 20 6e 6f 69 | 73 79 20 69 6e 73 74 72 |= 'A noi|sy instr|
|000016d0| 75 6d 65 6e 74 20 77 69 | 74 68 20 77 69 74 68 20 |ument wi|th with |
|000016e0| 61 20 66 69 6c 74 65 72 | 2e 27 0d 20 20 20 23 70 |a filter|.'.   #p|
|000016f0| 6d 74 72 46 69 65 6c 64 | 73 20 3d 20 38 20 23 20 |mtrField|s = 8 # |
|00001700| 74 68 69 73 20 69 73 20 | 74 68 65 20 62 61 73 65 |this is |the base|
|00001710| 20 6e 75 6d 62 65 72 0d | 20 20 20 23 70 6d 74 72 | number.|   #pmtr|
|00001720| 49 6e 66 6f 20 20 20 3d | 20 7b 7d 20 23 20 68 6f |Info   =| {} # ho|
|00001730| 6c 64 73 20 64 69 73 63 | 72 69 70 74 69 6f 6e 2c |lds disc|ription,|
|00001740| 20 70 72 65 73 65 74 20 | 66 6f 72 20 65 61 63 68 | preset |for each|
|00001750| 20 70 6d 74 72 20 69 6e | 20 61 20 64 69 63 74 69 | pmtr in| a dicti|
|00001760| 6f 6e 61 72 79 0d 20 20 | 20 23 61 75 74 68 6f 72 |onary.  | #author|
|00001770| 20 20 20 20 20 3d 20 27 | 27 20 23 20 61 74 74 72 |     = '|' # attr|
|00001780| 69 62 75 74 69 6f 6e 0d | 20 20 20 23 6f 72 63 43 |ibution.|   #orcC|
|00001790| 6f 64 65 20 3d 20 27 27 | 0d 20 20 20 23 73 63 6f |ode = ''|.   #sco|
|000017a0| 53 61 6d 70 6c 65 20 27 | 27 0d 0d 20 20 20 64 65 |Sample '|'..   de|
|000017b0| 66 20 5f 5f 69 6e 69 74 | 5f 5f 28 73 65 6c 66 29 |f __init|__(self)|
|000017c0| 3a 0d 20 20 20 20 20 20 | 70 61 73 73 0d 0d 20 20 |:.      |pass..  |
|000017d0| 20 64 65 66 20 67 65 74 | 49 6e 73 74 72 48 65 61 | def get|InstrHea|
|000017e0| 64 65 72 28 73 65 6c 66 | 29 3a 0d 20 20 20 20 20 |der(self|):.     |
|000017f0| 20 72 65 74 75 72 6e 20 | 27 5c 6e 3b 2d 2d 7c 7c | return |'\n;--|||
|00001800| 7c 7c 7c 7c 7c 7c 7c 7c | 7c 7c 2d 2d 69 25 69 2d ||||||||||||--i%i-|
|00001810| 2d 25 73 27 20 25 20 28 | 73 65 6c 66 2e 69 6e 75 |-%s' % (|self.inu|
|00001820| 6d 62 65 72 2c 20 73 65 | 6c 66 2e 6e 61 6d 65 29 |mber, se|lf.name)|
|00001830| 0d 0d 20 20 20 64 65 66 | 20 62 75 69 6c 64 49 6e |..   def| buildIn|
|00001840| 73 74 72 44 65 66 28 73 | 65 6c 66 2c 20 6e 6f 43 |strDef(s|elf, noC|
|00001850| 68 61 6e 6e 65 6c 73 29 | 3a 0d 20 20 20 20 20 20 |hannels)|:.      |
|00001860| 27 72 65 74 75 72 6e 73 | 20 61 20 73 74 72 69 6e |'returns| a strin|
|00001870| 67 20 6f 66 20 61 6c 6c | 20 74 68 65 20 63 6f 64 |g of all| the cod|
|00001880| 65 20 6e 65 65 64 65 64 | 20 66 6f 72 20 74 68 69 |e needed| for thi|
|00001890| 73 20 69 6e 73 74 72 75 | 6d 65 6e 74 27 0d 20 20 |s instru|ment'.  |
|000018a0| 20 20 20 20 6f 72 63 53 | 74 72 69 6e 67 20 3d 20 |    orcS|tring = |
|000018b0| 73 65 6c 66 2e 67 65 74 | 49 6e 73 74 72 48 65 61 |self.get|InstrHea|
|000018c0| 64 65 72 28 29 0d 20 20 | 20 20 20 20 6f 72 63 53 |der().  |    orcS|
|000018d0| 74 72 69 6e 67 20 3d 20 | 6f 72 63 53 74 72 69 6e |tring = |orcStrin|
|000018e0| 67 20 2b 20 73 65 6c 66 | 2e 6f 72 63 43 6f 64 65 |g + self|.orcCode|
|000018f0| 0d 20 20 20 20 20 20 73 | 65 6c 66 2e 6e 6f 43 68 |.      s|elf.noCh|
|00001900| 61 6e 6e 65 6c 73 20 3d | 20 6e 6f 43 68 61 6e 6e |annels =| noChann|
|00001910| 65 6c 73 0d 20 20 20 20 | 20 20 69 66 20 73 65 6c |els.    |  if sel|
|00001920| 66 2e 6e 6f 43 68 61 6e | 6e 65 6c 73 20 20 20 3d |f.noChan|nels   =|
|00001930| 3d 20 31 3a 0d 20 20 20 | 20 20 20 20 20 20 6f 72 |= 1:.   |      or|
|00001940| 63 53 74 72 69 6e 67 20 | 3d 20 6f 72 63 53 74 72 |cString |= orcStr|
|00001950| 69 6e 67 20 2b 20 73 65 | 6c 66 2e 6d 6f 6e 6f 4f |ing + se|lf.monoO|
|00001960| 75 74 70 75 74 0d 20 20 | 20 20 20 20 65 6c 69 66 |utput.  |    elif|
|00001970| 20 73 65 6c 66 2e 6e 6f | 43 68 61 6e 6e 65 6c 73 | self.no|Channels|
|00001980| 20 3d 3d 20 32 3a 0d 20 | 20 20 20 20 20 20 20 20 | == 2:. |        |
|00001990| 6f 72 63 53 74 72 69 6e | 67 20 3d 20 6f 72 63 53 |orcStrin|g = orcS|
|000019a0| 74 72 69 6e 67 20 2b 20 | 73 65 6c 66 2e 73 74 65 |tring + |self.ste|
|000019b0| 72 65 6f 4f 75 74 70 75 | 74 0d 20 20 20 20 20 20 |reoOutpu|t.      |
|000019c0| 65 6c 69 66 20 73 65 6c | 66 2e 6e 6f 43 68 61 6e |elif sel|f.noChan|
|000019d0| 6e 65 6c 73 20 3d 3d 20 | 34 3a 0d 20 20 20 20 20 |nels == |4:.     |
|000019e0| 20 20 20 20 6f 72 63 53 | 74 72 69 6e 67 20 3d 20 |    orcS|tring = |
|000019f0| 6f 72 63 53 74 72 69 6e | 67 20 2b 20 73 65 6c 66 |orcStrin|g + self|
|00001a00| 2e 71 75 61 64 4f 75 74 | 70 75 74 0d 20 20 20 20 |.quadOut|put.    |
|00001a10| 20 20 72 65 74 75 72 6e | 20 6f 72 63 53 74 72 69 |  return| orcStri|
|00001a20| 6e 67 0d 0d 20 20 20 64 | 65 66 20 67 65 74 50 72 |ng..   d|ef getPr|
|00001a30| 65 73 65 74 44 69 63 74 | 28 73 65 6c 66 29 3a 0d |esetDict|(self):.|
|00001a40| 20 20 20 20 20 20 70 72 | 65 73 65 74 44 69 63 74 |      pr|esetDict|
|00001a50| 20 3d 20 7b 7d 0d 20 20 | 20 20 20 20 23 20 73 6f | = {}.  |    # so|
|00001a60| 6d 65 20 66 69 78 65 64 | 20 76 61 6c 75 65 73 3a |me fixed| values:|
|00001a70| 0d 20 20 20 20 20 20 70 | 72 65 73 65 74 44 69 63 |.      p|resetDic|
|00001a80| 74 5b 27 66 69 65 6c 64 | 51 27 5d 20 3d 20 28 27 |t['field|Q'] = ('|
|00001a90| 62 61 73 6b 65 74 47 65 | 6e 27 2c 20 27 6f 72 64 |basketGe|n', 'ord|
|00001aa0| 65 72 65 64 43 79 63 6c | 69 63 27 2c 20 5b 30 5d |eredCycl|ic', [0]|
|00001ab0| 29 0d 20 20 20 20 20 20 | 70 72 65 73 65 74 44 69 |).      |presetDi|
|00001ac0| 63 74 5b 27 61 75 78 51 | 27 5d 20 20 20 3d 20 28 |ct['auxQ|']   = (|
|00001ad0| 30 2c 29 20 23 20 61 6e | 20 65 6d 70 74 79 20 74 |0,) # an| empty t|
|00001ae0| 75 70 6c 65 20 69 73 20 | 64 65 66 61 75 6c 74 20 |uple is |default |
|00001af0| 61 75 78 20 76 61 6c 75 | 65 0d 0d 20 20 20 20 20 |aux valu|e..     |
|00001b00| 20 23 20 67 65 74 20 76 | 61 6c 75 65 73 20 66 72 | # get v|alues fr|
|00001b10| 6f 6d 20 73 65 6c 66 2e | 64 65 66 61 75 6c 74 0d |om self.|default.|
|00001b20| 20 20 20 20 20 20 61 75 | 78 44 69 63 74 20 3d 20 |      au|xDict = |
|00001b30| 7b 7d 0d 20 20 20 20 20 | 20 66 6f 72 20 6b 65 79 |{}.     | for key|
|00001b40| 20 69 6e 20 73 65 6c 66 | 2e 64 65 66 61 75 6c 74 | in self|.default|
|00001b50| 2e 6b 65 79 73 28 29 3a | 20 23 20 69 73 6f 6c 61 |.keys():| # isola|
|00001b60| 74 65 20 70 6d 74 72 20 | 66 69 65 6c 64 73 0d 20 |te pmtr |fields. |
|00001b70| 20 20 20 20 20 20 20 20 | 69 66 20 6b 65 79 5b 3a |        |if key[:|
|00001b80| 34 5d 20 3d 3d 20 27 70 | 6d 74 72 27 3a 20 23 20 |4] == 'p|mtr': # |
|00001b90| 72 65 6e 61 6d 65 20 70 | 6d 74 72 20 6b 65 79 73 |rename p|mtr keys|
|00001ba0| 20 74 6f 20 61 20 73 69 | 6e 67 6c 65 20 61 75 78 | to a si|ngle aux|
|00001bb0| 51 20 6c 69 73 74 20 6f | 66 20 65 6e 74 72 69 65 |Q list o|f entrie|
|00001bc0| 73 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 6e 65 |s.      |      ne|
|00001bd0| 77 4b 65 79 20 20 3d 20 | 6b 65 79 5b 34 3a 5d 20 |wKey  = |key[4:] |
|00001be0| 23 20 74 68 69 73 20 69 | 73 20 74 68 65 20 6e 75 |# this i|s the nu|
|00001bf0| 6d 62 65 72 20 61 73 20 | 70 6d 74 72 20 66 69 65 |mber as |pmtr fie|
|00001c00| 6c 64 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 6e |ld.     |       n|
|00001c10| 65 77 4b 65 79 20 20 3d | 20 65 76 61 6c 28 6e 65 |ewKey  =| eval(ne|
|00001c20| 77 4b 65 79 29 20 2d 20 | 28 73 65 6c 66 2e 70 6d |wKey) - |(self.pm|
|00001c30| 74 72 46 69 65 6c 64 73 | 20 2b 20 31 29 20 23 20 |trFields| + 1) # |
|00001c40| 6d 61 6b 65 20 70 6d 74 | 72 37 20 3d 3d 20 61 75 |make pmt|r7 == au|
|00001c50| 78 30 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 61 |x0.     |       a|
|00001c60| 75 78 44 69 63 74 5b 6e | 65 77 4b 65 79 5d 20 3d |uxDict[n|ewKey] =|
|00001c70| 20 73 65 6c 66 2e 64 65 | 66 61 75 6c 74 5b 6b 65 | self.de|fault[ke|
|00001c80| 79 5d 0d 20 20 20 20 20 | 20 20 20 20 65 6c 73 65 |y].     |    else|
|00001c90| 3a 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 70 72 |:.      |      pr|
|00001ca0| 65 73 65 74 44 69 63 74 | 5b 6b 65 79 5d 20 3d 20 |esetDict|[key] = |
|00001cb0| 73 65 6c 66 2e 64 65 66 | 61 75 6c 74 5b 6b 65 79 |self.def|ault[key|
|00001cc0| 5d 0d 20 20 20 20 20 20 | 61 75 78 4b 65 79 4c 69 |].      |auxKeyLi|
|00001cd0| 73 74 20 3d 20 61 75 78 | 44 69 63 74 2e 6b 65 79 |st = aux|Dict.key|
|00001ce0| 73 28 29 20 23 20 67 65 | 74 20 6e 75 6d 62 65 72 |s() # ge|t number|
|00001cf0| 73 0d 20 20 20 20 20 20 | 69 66 20 73 65 6c 66 2e |s.      |if self.|
|00001d00| 70 6d 74 72 46 69 65 6c | 64 73 20 3e 20 36 3a 20 |pmtrFiel|ds > 6: |
|00001d10| 23 20 36 20 69 73 20 73 | 74 61 6e 64 61 72 64 20 |# 6 is s|tandard |
|00001d20| 73 69 7a 65 0d 20 20 20 | 20 20 20 20 20 20 61 75 |size.   |      au|
|00001d30| 78 4b 65 79 4c 69 73 74 | 2e 73 6f 72 74 28 29 0d |xKeyList|.sort().|
|00001d40| 20 20 20 20 20 20 20 20 | 20 61 75 78 51 20 3d 20 |        | auxQ = |
|00001d50| 5b 5d 20 23 20 70 61 63 | 6b 20 61 6c 6c 20 69 6e |[] # pac|k all in|
|00001d60| 74 6f 20 61 20 6c 69 73 | 74 0d 20 20 20 20 20 20 |to a lis|t.      |
|00001d70| 20 20 20 66 6f 72 20 6b | 65 79 4e 6f 20 69 6e 20 |   for k|eyNo in |
|00001d80| 61 75 78 4b 65 79 4c 69 | 73 74 3a 20 23 20 67 65 |auxKeyLi|st: # ge|
|00001d90| 74 73 20 6e 75 6d 62 65 | 72 20 69 6e 20 6f 72 64 |ts numbe|r in ord|
|00001da0| 65 72 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 61 |er.     |       a|
|00001db0| 75 78 51 2e 61 70 70 65 | 6e 64 28 61 75 78 44 69 |uxQ.appe|nd(auxDi|
|00001dc0| 63 74 5b 6b 65 79 4e 6f | 5d 29 0d 20 20 20 20 20 |ct[keyNo|]).     |
|00001dd0| 20 20 20 20 70 72 65 73 | 65 74 44 69 63 74 5b 27 |    pres|etDict['|
|00001de0| 61 75 78 51 27 5d 20 3d | 20 61 75 78 51 0d 20 20 |auxQ'] =| auxQ.  |
|00001df0| 20 20 20 20 72 65 74 75 | 72 6e 20 70 72 65 73 65 |    retu|rn prese|
|00001e00| 74 44 69 63 74 0d 0d 23 | 2d 2d 2d 2d 2d 2d 2d 2d |tDict..#|--------|
|00001e10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 7c 7c 7c 7c 7c 7c 7c |--------|-||||||||
|00001e50| 7c 7c 7c 7c 7c 2d 2d 0d | 23 2d 2d 2d 2d 2d 2d 2d ||||||--.|#-------|
|00001e60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001e90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 7c 7c 7c 7c 7c 7c |--------|--|||||||
|00001ea0| 7c 7c 7c 7c 7c 7c 2d 2d | 0d 23 20 74 68 65 73 65 |||||||--|.# these|
|00001eb0| 20 63 6c 61 73 73 65 73 | 20 69 6e 68 65 72 69 74 | classes| inherit|
|00001ec0| 20 61 6c 6c 20 66 75 6e | 63 74 69 6f 6e 73 20 66 | all fun|ctions f|
|00001ed0| 72 6f 6d 20 69 6e 73 74 | 72 53 68 65 6c 6c 0d 0d |rom inst|rShell..|
|00001ee0| 0d 0d 23 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..#-----|--------|
|00001ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001f20| 2d 2d 2d 2d 7c 7c 7c 7c | 7c 7c 7c 7c 7c 7c 7c 7c |----||||||||||||||
|00001f30| 2d 2d 0d 63 6c 61 73 73 | 20 69 6e 73 74 72 32 28 |--.class| instr2(|
|00001f40| 69 6e 73 74 72 53 68 65 | 6c 6c 29 3a 0d 20 20 20 |instrShe|ll):.   |
|00001f50| 69 6e 75 6d 62 65 72 20 | 20 20 20 3d 20 32 0d 20 |inumber |   = 2. |
|00001f60| 20 20 6e 61 6d 65 20 20 | 20 20 20 20 20 3d 20 27 |  name  |     = '|
|00001f70| 61 64 64 69 74 69 76 65 | 42 65 6c 6c 42 72 69 67 |additive|BellBrig|
|00001f80| 68 74 27 0d 20 20 20 69 | 6e 66 6f 20 20 20 20 20 |ht'.   i|nfo     |
|00001f90| 20 20 3d 20 27 41 20 73 | 69 6d 70 6c 65 20 62 65 |  = 'A s|imple be|
|00001fa0| 6c 6c 20 6d 61 64 65 20 | 77 69 74 68 20 31 32 20 |ll made |with 12 |
|00001fb0| 70 61 72 74 69 61 6c 73 | 2c 20 65 61 63 68 20 77 |partials|, each w|
|00001fc0| 69 74 68 20 74 68 65 69 | 72 20 6f 77 6e 20 65 6e |ith thei|r own en|
|00001fd0| 76 65 6c 6f 70 65 2c 20 | 74 68 65 6e 20 6d 69 78 |velope, |then mix|
|00001fe0| 65 64 20 74 6f 67 65 74 | 68 65 72 2e 20 42 61 73 |ed toget|her. Bas|
|00001ff0| 65 64 20 6f 6e 20 64 65 | 73 69 67 6e 20 62 79 20 |ed on de|sign by |
|00002000| 43 2e 20 52 69 73 73 65 | 74 2e 27 0d 20 20 20 70 |C. Risse|t.'.   p|
|00002010| 6d 74 72 46 69 65 6c 64 | 73 20 3d 20 36 20 20 23 |mtrField|s = 6  #|
|00002020| 20 74 68 69 73 20 69 73 | 20 74 68 65 20 62 61 73 | this is| the bas|
|00002030| 65 20 6e 75 6d 62 65 72 | 0d 20 20 20 70 6d 74 72 |e number|.   pmtr|
|00002040| 49 6e 66 6f 20 20 20 3d | 20 7b 7d 20 23 20 69 6e |Info   =| {} # in|
|00002050| 66 6f 72 20 66 6f 72 20 | 61 75 78 20 70 65 72 61 |for for |aux pera|
|00002060| 6d 65 74 65 72 73 20 28 | 67 72 65 61 74 65 72 20 |meters (|greater |
|00002070| 74 68 61 6e 20 73 69 78 | 29 0d 20 20 20 64 65 66 |than six|).   def|
|00002080| 61 75 6c 74 20 20 20 20 | 3d 20 7b 0d 20 20 20 20 |ault    |= {.    |
|00002090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 27 72 68 |        |     'rh|
|000020a0| 79 74 68 6d 51 27 20 3a | 20 28 28 31 36 2c 20 31 |ythmQ' :| ((16, 1|
|000020b0| 29 2c 20 28 31 36 2c 20 | 33 29 29 2c 20 20 20 20 |), (16, |3)),    |
|000020c0| 20 20 20 20 23 28 64 69 | 76 69 73 69 6f 6e 31 2c |    #(di|vision1,|
|000020d0| 20 23 29 2c 20 28 64 69 | 76 69 73 69 6f 6e 32 2c | #), (di|vision2,|
|000020e0| 20 23 29 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 | #).    |        |
|000020f0| 20 20 20 20 20 27 6f 63 | 74 51 27 20 20 20 20 3a |     'oc|tQ'    :|
|00002100| 20 28 5b 37 2c 38 5d 2c | 20 27 72 61 6e 64 6f 6d | ([7,8],| 'random|
|00002110| 43 68 6f 69 63 65 27 29 | 2c 20 20 20 20 20 20 20 |Choice')|,       |
|00002120| 20 20 20 20 20 20 20 23 | 28 5b 6c 69 73 74 20 6f |       #|([list o|
|00002130| 66 20 72 65 67 69 73 74 | 65 72 73 5d 2c 20 30 3d |f regist|ers], 0=|
|00002140| 72 61 6e 64 6f 6d 2f 31 | 3d 6f 72 64 65 72 65 64 |random/1|=ordered|
|00002150| 29 20 28 38 2e 30 30 20 | 3d 20 43 34 29 0d 20 20 |) (8.00 |= C4).  |
|00002160| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 27 |        |       '|
|00002170| 61 6d 70 51 27 20 20 20 | 20 3a 20 28 36 30 2c 37 |ampQ'   | : (60,7|
|00002180| 30 2c 20 31 2c 20 27 6c | 69 6e 65 61 72 55 70 27 |0, 1, 'l|inearUp'|
|00002190| 29 2c 20 20 20 20 20 20 | 20 20 20 20 20 20 23 6c |),      |      #l|
|000021a0| 6f 77 65 73 74 2c 20 68 | 69 67 68 65 73 74 2c 20 |owest, h|ighest, |
|000021b0| 69 6e 63 72 65 6d 65 6e | 74 20 28 69 6e 20 64 62 |incremen|t (in db|
|000021c0| 29 2c 20 64 69 72 65 63 | 74 69 6f 6e 0d 20 20 20 |), direc|tion.   |
|000021d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 27 70 |        |      'p|
|000021e0| 61 6e 51 27 20 20 20 20 | 3a 20 28 2e 32 30 2c 20 |anQ'    |: (.20, |
|000021f0| 2e 38 30 2c 20 2e 30 38 | 2c 20 27 6c 69 6e 65 61 |.80, .08|, 'linea|
|00002200| 72 44 6f 77 6e 27 29 2c | 20 20 20 20 20 20 20 20 |rDown'),|        |
|00002210| 23 6c 6f 77 65 73 74 2c | 20 68 69 67 68 65 73 74 |#lowest,| highest|
|00002220| 28 31 20 6d 61 78 29 2c | 20 69 6e 63 72 65 6d 65 |(1 max),| increme|
|00002230| 6e 74 2c 20 64 69 72 65 | 63 74 69 6f 6e 0d 20 20 |nt, dire|ction.  |
|00002240| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 7d 20 |        |      } |
|00002250| 0d 20 20 20 61 75 74 68 | 6f 72 20 20 20 20 20 3d |.   auth|or     =|
|00002260| 20 27 27 20 23 20 61 74 | 74 72 69 62 75 74 69 6f | '' # at|tributio|
|00002270| 6e 0d 20 20 20 6f 72 63 | 43 6f 64 65 20 3d 20 27 |n.   orc|Code = '|
|00002280| 27 27 0d 69 6e 73 74 72 | 20 32 0d 20 20 20 69 70 |''.instr| 2.   ip|
|00002290| 61 6e 20 20 20 3d 20 70 | 36 0d 20 20 20 69 64 75 |an   = p|6.   idu|
|000022a0| 72 31 20 20 3d 20 70 33 | 0d 20 20 20 69 61 6d 70 |r1  = p3|.   iamp|
|000022b0| 31 20 20 3d 20 61 6d 70 | 64 62 28 70 34 29 0d 20 |1  = amp|db(p4). |
|000022c0| 20 20 69 66 72 65 71 31 | 20 3d 20 28 63 70 73 70 |  ifreq1| = (cpsp|
|000022d0| 63 68 28 70 35 29 20 2a | 20 2e 35 36 29 0d 20 20 |ch(p5) *| .56).  |
|000022e0| 20 69 64 75 72 32 20 20 | 3d 20 28 70 33 20 2a 20 | idur2  |= (p3 * |
|000022f0| 2e 39 29 0d 20 20 20 69 | 61 6d 70 32 20 20 3d 20 |.9).   i|amp2  = |
|00002300| 28 61 6d 70 64 62 28 70 | 34 29 20 2a 20 2e 36 37 |(ampdb(p|4) * .67|
|00002310| 29 0d 20 20 20 69 66 72 | 65 71 32 20 3d 20 28 63 |).   ifr|eq2 = (c|
|00002320| 70 73 70 63 68 28 70 35 | 29 29 0d 20 20 20 69 64 |pspch(p5|)).   id|
|00002330| 75 72 33 20 20 3d 20 28 | 70 33 20 2a 20 2e 36 35 |ur3  = (|p3 * .65|
|00002340| 29 0d 20 20 20 69 61 6d | 70 33 20 20 3d 20 28 61 |).   iam|p3  = (a|
|00002350| 6d 70 64 62 28 70 34 29 | 29 0d 20 20 20 69 66 72 |mpdb(p4)|).   ifr|
|00002360| 65 71 33 20 3d 20 28 63 | 70 73 70 63 68 28 70 35 |eq3 = (c|pspch(p5|
|00002370| 29 20 2a 20 2e 39 32 29 | 0d 20 20 20 69 64 75 72 |) * .92)|.   idur|
|00002380| 34 20 20 3d 20 28 70 33 | 20 2a 20 2e 35 35 29 0d |4  = (p3| * .55).|
|00002390| 20 20 20 69 61 6d 70 34 | 20 20 3d 20 28 61 6d 70 |   iamp4|  = (amp|
|000023a0| 64 62 28 70 34 29 20 20 | 2a 20 31 2e 38 29 0d 20 |db(p4)  |* 1.8). |
|000023b0| 20 20 69 66 72 65 71 34 | 20 3d 20 28 63 70 73 70 |  ifreq4| = (cpsp|
|000023c0| 63 68 28 70 35 29 20 2a | 20 32 2e 36 32 29 20 20 |ch(p5) *| 2.62)  |
|000023d0| 20 20 20 20 20 20 0d 20 | 20 20 69 64 75 72 35 20 |      . |  idur5 |
|000023e0| 20 3d 20 28 70 33 20 2a | 20 2e 33 35 29 0d 20 20 | = (p3 *| .35).  |
|000023f0| 20 69 61 6d 70 35 20 20 | 3d 20 28 61 6d 70 64 62 | iamp5  |= (ampdb|
|00002400| 28 70 34 29 20 20 2a 20 | 32 2e 36 37 29 0d 20 20 |(p4)  * |2.67).  |
|00002410| 20 69 66 72 65 71 35 20 | 3d 20 28 63 70 73 70 63 | ifreq5 |= (cpspc|
|00002420| 68 28 70 35 29 20 2a 20 | 31 2e 31 39 29 0d 20 20 |h(p5) * |1.19).  |
|00002430| 20 69 64 75 72 36 20 20 | 3d 20 28 70 33 20 2a 20 | idur6  |= (p3 * |
|00002440| 2e 33 35 29 0d 20 20 20 | 69 61 6d 70 36 20 20 3d |.35).   |iamp6  =|
|00002450| 20 28 61 6d 70 64 62 28 | 70 34 29 20 20 2a 20 31 | (ampdb(|p4)  * 1|
|00002460| 2e 36 37 29 0d 20 20 20 | 69 66 72 65 71 36 20 3d |.67).   |ifreq6 =|
|00002470| 20 28 63 70 73 70 63 68 | 28 70 35 29 20 2a 20 31 | (cpspch|(p5) * 1|
|00002480| 2e 37 29 0d 20 20 20 69 | 64 75 72 37 20 20 3d 20 |.7).   i|dur7  = |
|00002490| 28 70 33 20 2a 20 2e 32 | 35 29 0d 20 20 20 69 61 |(p3 * .2|5).   ia|
|000024a0| 6d 70 37 20 20 3d 20 28 | 61 6d 70 64 62 28 70 34 |mp7  = (|ampdb(p4|
|000024b0| 29 20 20 2a 20 31 2e 34 | 36 29 0d 20 20 20 69 66 |)  * 1.4|6).   if|
|000024c0| 72 65 71 37 20 3d 20 28 | 63 70 73 70 63 68 28 70 |req7 = (|cpspch(p|
|000024d0| 35 29 20 2a 20 32 29 0d | 20 20 20 69 64 75 72 38 |5) * 2).|   idur8|
|000024e0| 20 20 3d 20 28 70 33 20 | 2a 20 2e 32 29 0d 20 20 |  = (p3 |* .2).  |
|000024f0| 20 69 61 6d 70 38 20 20 | 3d 20 28 61 6d 70 64 62 | iamp8  |= (ampdb|
|00002500| 28 70 34 29 20 20 2a 20 | 31 2e 33 33 29 0d 20 20 |(p4)  * |1.33).  |
|00002510| 20 69 66 72 65 71 38 20 | 3d 20 28 63 70 73 70 63 | ifreq8 |= (cpspc|
|00002520| 68 28 70 35 29 20 2a 20 | 32 2e 37 34 29 0d 20 20 |h(p5) * |2.74).  |
|00002530| 20 69 64 75 72 39 20 20 | 3d 20 28 70 33 20 2a 20 | idur9  |= (p3 * |
|00002540| 2e 31 35 29 0d 20 20 20 | 69 61 6d 70 39 20 20 3d |.15).   |iamp9  =|
|00002550| 20 28 61 6d 70 64 62 28 | 70 34 29 20 20 2a 20 31 | (ampdb(|p4)  * 1|
|00002560| 2e 33 33 29 0d 20 20 20 | 69 66 72 65 71 39 20 3d |.33).   |ifreq9 =|
|00002570| 20 28 63 70 73 70 63 68 | 28 70 35 29 20 2a 20 33 | (cpspch|(p5) * 3|
|00002580| 29 0d 20 20 20 69 64 75 | 72 31 30 20 3d 20 28 70 |).   idu|r10 = (p|
|00002590| 33 20 2a 20 2e 31 29 0d | 20 20 20 69 61 6d 70 31 |3 * .1).|   iamp1|
|000025a0| 30 20 3d 20 28 61 6d 70 | 64 62 28 70 34 29 29 0d |0 = (amp|db(p4)).|
|000025b0| 20 20 20 69 66 72 65 71 | 31 30 3d 20 28 63 70 73 |   ifreq|10= (cps|
|000025c0| 70 63 68 28 70 35 29 20 | 2a 20 33 2e 37 36 29 0d |pch(p5) |* 3.76).|
|000025d0| 20 20 20 69 64 75 72 31 | 31 20 3d 20 28 70 33 20 |   idur1|1 = (p3 |
|000025e0| 2a 20 2e 30 37 35 29 0d | 20 20 20 69 61 6d 70 31 |* .075).|   iamp1|
|000025f0| 31 20 3d 20 28 61 6d 70 | 64 62 28 70 34 29 20 20 |1 = (amp|db(p4)  |
|00002600| 2a 20 31 2e 33 33 29 0d | 20 20 20 69 66 72 65 71 |* 1.33).|   ifreq|
|00002610| 31 31 3d 20 28 63 70 73 | 70 63 68 28 70 35 29 20 |11= (cps|pch(p5) |
|00002620| 2a 20 34 2e 30 37 29 0d | 20 20 20 0d 20 20 20 20 |* 4.07).|   .    |
|00002630| 20 20 3b 63 72 65 61 74 | 65 20 6f 73 63 69 6c 61 |  ;creat|e oscila|
|00002640| 74 6f 72 73 20 66 6f 72 | 20 65 61 63 68 20 70 61 |tors for| each pa|
|00002650| 72 74 69 61 6c 0d 20 20 | 20 6b 6f 73 63 69 6c 31 |rtial.  | koscil1|
|00002660| 20 6f 73 63 69 6c 31 69 | 20 20 20 20 30 2c 20 69 | oscil1i|    0, i|
|00002670| 61 6d 70 31 2c 20 69 64 | 75 72 31 2c 20 32 0d 20 |amp1, id|ur1, 2. |
|00002680| 20 20 61 6f 73 63 69 6c | 69 31 20 6f 73 63 69 6c |  aoscil|i1 oscil|
|00002690| 69 20 20 20 20 6b 6f 73 | 63 69 6c 31 2c 20 69 66 |i    kos|cil1, if|
|000026a0| 72 65 71 31 2c 20 33 0d | 20 20 20 6b 6f 73 63 69 |req1, 3.|   kosci|
|000026b0| 6c 32 20 6f 73 63 69 6c | 31 69 20 20 20 20 30 2c |l2 oscil|1i    0,|
|000026c0| 20 69 61 6d 70 32 2c 20 | 69 64 75 72 32 2c 20 32 | iamp2, |idur2, 2|
|000026d0| 0d 20 20 20 61 6f 73 63 | 69 6c 69 32 20 6f 73 63 |.   aosc|ili2 osc|
|000026e0| 69 6c 69 20 20 20 20 6b | 6f 73 63 69 6c 32 2c 20 |ili    k|oscil2, |
|000026f0| 69 66 72 65 71 32 2c 20 | 33 0d 20 20 20 6b 6f 73 |ifreq2, |3.   kos|
|00002700| 63 69 6c 33 20 6f 73 63 | 69 6c 31 69 20 20 20 20 |cil3 osc|il1i    |
|00002710| 30 2c 20 69 61 6d 70 33 | 2c 20 69 64 75 72 33 2c |0, iamp3|, idur3,|
|00002720| 20 32 0d 20 20 20 61 6f | 73 63 69 6c 69 33 20 6f | 2.   ao|scili3 o|
|00002730| 73 63 69 6c 69 20 20 20 | 20 6b 6f 73 63 69 6c 33 |scili   | koscil3|
|00002740| 2c 20 69 66 72 65 71 33 | 2c 20 33 0d 20 20 20 6b |, ifreq3|, 3.   k|
|00002750| 6f 73 63 69 6c 34 20 6f | 73 63 69 6c 31 69 20 20 |oscil4 o|scil1i  |
|00002760| 20 20 30 2c 20 69 61 6d | 70 34 2c 20 69 64 75 72 |  0, iam|p4, idur|
|00002770| 34 2c 20 32 0d 20 20 20 | 61 6f 73 63 69 6c 69 34 |4, 2.   |aoscili4|
|00002780| 20 6f 73 63 69 6c 69 20 | 20 20 20 6b 6f 73 63 69 | oscili |   kosci|
|00002790| 6c 34 2c 20 69 66 72 65 | 71 34 2c 20 33 0d 20 20 |l4, ifre|q4, 3.  |
|000027a0| 20 6b 6f 73 63 69 6c 35 | 20 6f 73 63 69 6c 31 69 | koscil5| oscil1i|
|000027b0| 20 20 20 20 30 2c 20 69 | 61 6d 70 35 2c 20 69 64 |    0, i|amp5, id|
|000027c0| 75 72 35 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur5, 2. |  aoscil|
|000027d0| 69 35 20 6f 73 63 69 6c | 69 20 20 20 20 6b 6f 73 |i5 oscil|i    kos|
|000027e0| 63 69 6c 35 2c 20 69 66 | 72 65 71 35 2c 20 33 0d |cil5, if|req5, 3.|
|000027f0| 20 20 20 6b 6f 73 63 69 | 6c 36 20 6f 73 63 69 6c |   kosci|l6 oscil|
|00002800| 31 69 20 20 20 20 30 2c | 20 69 61 6d 70 36 2c 20 |1i    0,| iamp6, |
|00002810| 69 64 75 72 36 2c 20 32 | 0d 20 20 20 61 6f 73 63 |idur6, 2|.   aosc|
|00002820| 69 6c 69 36 20 6f 73 63 | 69 6c 69 20 20 20 20 6b |ili6 osc|ili    k|
|00002830| 6f 73 63 69 6c 36 2c 20 | 69 66 72 65 71 36 2c 20 |oscil6, |ifreq6, |
|00002840| 33 0d 20 20 20 6b 6f 73 | 63 69 6c 37 20 6f 73 63 |3.   kos|cil7 osc|
|00002850| 69 6c 31 69 20 20 20 20 | 30 2c 20 69 61 6d 70 37 |il1i    |0, iamp7|
|00002860| 2c 20 69 64 75 72 37 2c | 20 32 0d 20 20 20 61 6f |, idur7,| 2.   ao|
|00002870| 73 63 69 6c 69 37 20 6f | 73 63 69 6c 69 20 20 20 |scili7 o|scili   |
|00002880| 20 6b 6f 73 63 69 6c 37 | 2c 20 69 66 72 65 71 37 | koscil7|, ifreq7|
|00002890| 2c 20 33 0d 20 20 20 6b | 6f 73 63 69 6c 38 20 6f |, 3.   k|oscil8 o|
|000028a0| 73 63 69 6c 31 69 20 20 | 20 20 30 2c 20 69 61 6d |scil1i  |  0, iam|
|000028b0| 70 38 2c 20 69 64 75 72 | 38 2c 20 32 0d 20 20 20 |p8, idur|8, 2.   |
|000028c0| 61 6f 73 63 69 6c 69 38 | 20 6f 73 63 69 6c 69 20 |aoscili8| oscili |
|000028d0| 20 20 20 6b 6f 73 63 69 | 6c 38 2c 20 69 66 72 65 |   kosci|l8, ifre|
|000028e0| 71 38 2c 20 33 0d 20 20 | 20 6b 6f 73 63 69 6c 39 |q8, 3.  | koscil9|
|000028f0| 20 6f 73 63 69 6c 31 69 | 20 20 20 20 30 2c 20 69 | oscil1i|    0, i|
|00002900| 61 6d 70 39 2c 20 69 64 | 75 72 39 2c 20 32 0d 20 |amp9, id|ur9, 2. |
|00002910| 20 20 61 6f 73 63 69 6c | 69 39 20 6f 73 63 69 6c |  aoscil|i9 oscil|
|00002920| 69 20 20 20 20 6b 6f 73 | 63 69 6c 39 2c 20 69 66 |i    kos|cil9, if|
|00002930| 72 65 71 39 2c 20 33 0d | 20 20 20 6b 6f 73 63 69 |req9, 3.|   kosci|
|00002940| 6c 31 30 20 6f 73 63 69 | 6c 31 69 20 20 20 30 2c |l10 osci|l1i   0,|
|00002950| 20 69 61 6d 70 31 30 2c | 20 69 64 75 72 31 30 2c | iamp10,| idur10,|
|00002960| 20 32 0d 20 20 20 61 6f | 73 63 69 6c 69 31 30 20 | 2.   ao|scili10 |
|00002970| 6f 73 63 69 6c 69 20 20 | 20 6b 6f 73 63 69 6c 31 |oscili  | koscil1|
|00002980| 30 2c 20 69 66 72 65 71 | 31 30 2c 20 33 0d 20 20 |0, ifreq|10, 3.  |
|00002990| 20 6b 6f 73 63 69 6c 31 | 31 20 6f 73 63 69 6c 31 | koscil1|1 oscil1|
|000029a0| 69 20 20 20 30 2c 20 69 | 61 6d 70 31 31 2c 20 69 |i   0, i|amp11, i|
|000029b0| 64 75 72 31 31 2c 20 32 | 0d 20 20 20 61 6f 73 63 |dur11, 2|.   aosc|
|000029c0| 69 6c 69 31 31 20 6f 73 | 63 69 6c 69 20 20 20 6b |ili11 os|cili   k|
|000029d0| 6f 73 63 69 6c 31 31 2c | 20 69 66 72 65 71 31 31 |oscil11,| ifreq11|
|000029e0| 2c 20 33 0d 0d 20 20 20 | 3b 6f 75 74 70 75 74 20 |, 3..   |;output |
|000029f0| 61 73 73 69 67 6e 6d 65 | 6e 74 73 0d 20 20 20 61 |assignme|nts.   a|
|00002a00| 4d 69 78 53 69 67 20 20 | 20 20 20 20 20 20 20 3d |MixSig  |       =|
|00002a10| 20 28 61 6f 73 63 69 6c | 69 31 2b 61 6f 73 63 69 | (aoscil|i1+aosci|
|00002a20| 6c 69 32 2b 61 6f 73 63 | 69 6c 69 33 2b 61 6f 73 |li2+aosc|ili3+aos|
|00002a30| 63 69 6c 69 34 2b 61 6f | 73 63 69 6c 69 35 20 2b |cili4+ao|scili5 +|
|00002a40| 20 61 6f 73 63 69 6c 69 | 36 2b 61 6f 73 63 69 6c | aoscili|6+aoscil|
|00002a50| 69 37 2b 61 6f 73 63 69 | 6c 69 38 2b 61 6f 73 63 |i7+aosci|li8+aosc|
|00002a60| 69 6c 69 39 2b 61 6f 73 | 63 69 6c 69 31 30 2b 61 |ili9+aos|cili10+a|
|00002a70| 6f 73 63 69 6c 69 31 31 | 29 0d 27 27 27 0d 20 20 |oscili11|).'''.  |
|00002a80| 20 73 63 6f 53 61 6d 70 | 6c 65 20 3d 20 27 27 27 | scoSamp|le = '''|
|00002a90| 0d 3b 70 31 20 20 20 20 | 70 32 20 20 20 20 70 33 |.;p1    |p2    p3|
|00002aa0| 20 20 20 20 20 70 34 20 | 20 20 20 70 35 20 20 20 |     p4 |   p5   |
|00002ab0| 20 20 20 70 36 0d 3b 69 | 6e 73 74 20 20 73 74 61 |   p6.;i|nst  sta|
|00002ac0| 72 74 20 64 75 72 20 20 | 20 20 61 6d 70 20 20 20 |rt dur  |  amp   |
|00002ad0| 50 43 48 20 20 20 20 20 | 70 61 6e 0d 69 32 20 20 |PCH     |pan.i2  |
|00002ae0| 20 20 31 32 2e 30 30 20 | 31 2e 30 30 30 20 20 39 |  12.00 |1.000  9|
|00002af0| 37 20 20 20 20 37 2e 30 | 39 20 20 20 2e 35 0d 69 |7    7.0|9   .5.i|
|00002b00| 32 20 20 20 20 31 32 2e | 31 30 20 31 2e 30 30 30 |2    12.|10 1.000|
|00002b10| 20 20 38 34 20 20 20 20 | 38 2e 30 39 20 20 20 2e |  84    |8.09   .|
|00002b20| 35 0d 27 27 27 0d 0d 23 | 2d 2d 2d 2d 2d 2d 2d 2d |5.'''..#|--------|
|00002b30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002b60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 7c 7c 7c 7c 7c 7c 7c |--------|-||||||||
|00002b70| 7c 7c 7c 7c 7c 2d 2d 0d | 63 6c 61 73 73 20 69 6e ||||||--.|class in|
|00002b80| 73 74 72 33 28 69 6e 73 | 74 72 53 68 65 6c 6c 29 |str3(ins|trShell)|
|00002b90| 3a 0d 20 20 20 69 6e 75 | 6d 62 65 72 20 20 20 20 |:.   inu|mber    |
|00002ba0| 20 3d 20 33 0d 20 20 20 | 6e 61 6d 65 20 20 20 20 | = 3.   |name    |
|00002bb0| 20 20 20 3d 20 27 73 69 | 6e 65 57 61 76 65 44 72 |   = 'si|neWaveDr|
|00002bc0| 6f 6e 65 27 0d 20 20 20 | 69 6e 66 6f 20 20 20 20 |one'.   |info    |
|00002bd0| 20 20 20 3d 20 27 41 20 | 73 69 6d 70 6c 65 20 73 |   = 'A |simple s|
|00002be0| 69 6e 65 20 77 61 76 65 | 20 64 72 6f 6e 65 2e 27 |ine wave| drone.'|
|00002bf0| 0d 20 20 20 70 6d 74 72 | 46 69 65 6c 64 73 20 3d |.   pmtr|Fields =|
|00002c00| 20 36 20 23 20 74 6f 74 | 61 6c 20 6e 75 6d 62 65 | 6 # tot|al numbe|
|00002c10| 72 0d 20 20 20 70 6d 74 | 72 49 6e 66 6f 20 20 20 |r.   pmt|rInfo   |
|00002c20| 3d 20 7b 7d 20 23 20 68 | 6f 6c 64 73 20 64 69 73 |= {} # h|olds dis|
|00002c30| 63 72 69 70 74 69 6f 6e | 2c 20 70 72 65 73 65 74 |cription|, preset|
|00002c40| 20 66 6f 72 20 65 61 63 | 68 20 70 6d 74 72 20 69 | for eac|h pmtr i|
|00002c50| 6e 20 61 20 64 69 63 74 | 69 6f 6e 61 72 79 0d 20 |n a dict|ionary. |
|00002c60| 20 20 64 65 66 61 75 6c | 74 20 20 20 20 3d 20 7b |  defaul|t    = {|
|00002c70| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00002c80| 20 20 27 72 68 79 74 68 | 6d 51 27 20 3a 20 28 28 |  'rhyth|mQ' : ((|
|00002c90| 34 2c 20 35 29 2c 20 28 | 34 2c 20 35 29 29 2c 0d |4, 5), (|4, 5)),.|
|00002ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002cb0| 20 27 6f 63 74 51 27 20 | 20 20 20 3a 20 28 5b 37 | 'octQ' |   : ([7|
|00002cc0| 2c 38 5d 2c 20 20 20 27 | 72 61 6e 64 6f 6d 43 68 |,8],   '|randomCh|
|00002cd0| 6f 69 63 65 27 29 2c 0d | 20 20 20 20 20 20 20 20 |oice'),.|        |
|00002ce0| 20 20 20 20 20 20 20 20 | 20 27 61 6d 70 51 27 20 |        | 'ampQ' |
|00002cf0| 20 20 20 3a 20 28 36 30 | 2c 37 30 2c 20 31 2c 20 |   : (60|,70, 1, |
|00002d00| 27 6c 69 6e 65 61 72 55 | 70 27 29 20 2c 0d 20 20 |'linearU|p') ,.  |
|00002d10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 27 |        |       '|
|00002d20| 70 61 6e 51 27 20 20 20 | 20 3a 20 28 2e 36 30 2c |panQ'   | : (.60,|
|00002d30| 20 31 2e 30 2c 20 2e 30 | 38 2c 20 27 6c 69 6e 65 | 1.0, .0|8, 'line|
|00002d40| 61 72 44 6f 77 6e 27 29 | 2c 0d 20 20 20 20 20 20 |arDown')|,.      |
|00002d50| 20 20 20 20 20 20 20 20 | 20 20 7d 20 0d 20 20 20 |        |  } .   |
|00002d60| 61 75 74 68 6f 72 20 20 | 20 20 20 3d 20 27 61 74 |author  |   = 'at|
|00002d70| 68 65 6e 61 43 4c 20 6e | 61 74 69 76 65 27 20 23 |henaCL n|ative' #|
|00002d80| 20 61 74 74 72 69 62 75 | 74 69 6f 6e 0d 20 20 20 | attribu|tion.   |
|00002d90| 6f 72 63 43 6f 64 65 20 | 3d 20 27 27 27 0d 69 6e |orcCode |= '''.in|
|00002da0| 73 74 72 20 33 0d 20 20 | 20 69 64 75 72 20 20 3d |str 3.  | idur  =|
|00002db0| 20 70 33 0d 20 20 20 69 | 61 6d 70 20 20 3d 20 61 | p3.   i|amp  = a|
|00002dc0| 6d 70 64 62 28 70 34 29 | 0d 20 20 20 69 66 72 65 |mpdb(p4)|.   ifre|
|00002dd0| 71 20 3d 20 63 70 73 70 | 63 68 28 70 35 29 0d 20 |q = cpsp|ch(p5). |
|00002de0| 20 20 69 70 61 6e 20 20 | 3d 20 70 36 0d 20 20 20 |  ipan  |= p6.   |
|00002df0| 0d 20 20 20 3b 67 65 6e | 65 72 61 74 65 20 61 70 |.   ;gen|erate ap|
|00002e00| 6c 69 74 75 64 65 20 65 | 6e 76 65 6c 6f 70 65 0d |litude e|nvelope.|
|00002e10| 20 20 20 3b 20 20 20 20 | 20 20 20 20 20 20 20 20 |   ;    |        |
|00002e20| 20 61 6d 70 20 20 20 61 | 74 74 61 63 6b 20 20 20 | amp   a|ttack   |
|00002e30| 20 20 20 20 20 64 75 72 | 20 20 20 20 72 65 6c 65 |     dur|    rele|
|00002e40| 61 73 65 0d 20 20 20 6b | 31 20 20 20 6c 69 6e 65 |ase.   k|1   line|
|00002e50| 6e 20 20 20 69 61 6d 70 | 2c 20 20 28 69 64 75 72 |n   iamp|,  (idur|
|00002e60| 20 2a 20 2e 31 38 29 2c | 20 69 64 75 72 2c 20 20 | * .18),| idur,  |
|00002e70| 28 69 64 75 72 2a 2e 31 | 39 29 0d 20 20 20 0d 20 |(idur*.1|9).   . |
|00002e80| 20 20 3b 67 65 6e 65 72 | 61 74 65 20 76 69 62 72 |  ;gener|ate vibr|
|00002e90| 61 74 6f 20 65 6e 76 65 | 6c 6f 70 65 20 20 20 20 |ato enve|lope    |
|00002ea0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00002eb0| 20 20 20 0d 20 20 20 69 | 72 65 6c 20 20 3d 20 31 |   .   i|rel  = 1|
|00002ec0| 2e 30 30 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.00     |        |
|00002ed0| 20 20 20 20 20 20 3b 20 | 73 65 74 20 76 69 62 72 |      ; |set vibr|
|00002ee0| 61 74 6f 20 72 65 6c 65 | 61 73 65 20 74 69 6d 65 |ato rele|ase time|
|00002ef0| 0d 20 20 20 69 64 65 6c | 31 20 3d 20 69 64 75 72 |.   idel|1 = idur|
|00002f00| 2d 28 2e 32 35 20 2a 20 | 69 64 75 72 29 20 20 20 |-(.25 * |idur)   |
|00002f10| 20 20 20 3b 20 63 61 6c | 63 75 6c 61 74 65 20 69 |   ; cal|culate i|
|00002f20| 6e 69 74 69 61 6c 20 64 | 65 6c 61 79 20 28 25 20 |nitial d|elay (% |
|00002f30| 6f 66 20 64 75 72 29 0d | 20 20 20 69 73 75 73 20 |of dur).|   isus |
|00002f40| 20 3d 20 69 64 75 72 20 | 2d 20 28 69 64 65 6c 31 | = idur |- (idel1|
|00002f50| 20 2d 20 69 72 65 6c 29 | 20 20 3b 20 63 61 6c 63 | - irel)|  ; calc|
|00002f60| 75 6c 61 74 65 20 72 65 | 6d 61 69 6e 69 6e 67 20 |ulate re|maining |
|00002f70| 64 75 72 61 74 69 6f 6e | 20 20 20 20 20 20 20 20 |duration|        |
|00002f80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 0d |        |       .|
|00002f90| 20 20 20 69 64 65 70 20 | 20 3d 20 32 20 20 20 20 |   idep | = 2    |
|00002fa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 76 |        |     ; v|
|00002fb0| 69 62 72 61 74 6f 20 64 | 65 70 74 68 20 28 31 2d |ibrato d|epth (1-|
|00002fc0| 39 20 61 72 65 20 67 6f | 6f 64 29 0d 20 20 20 69 |9 are go|od).   i|
|00002fd0| 72 61 74 20 20 3d 20 31 | 20 20 20 20 20 20 20 20 |rat  = 1|        |
|00002fe0| 20 20 20 20 20 20 20 20 | 20 3b 20 76 69 62 72 61 |        | ; vibra|
|00002ff0| 74 6f 20 72 61 74 65 20 | 20 28 31 2d 39 20 61 72 |to rate | (1-9 ar|
|00003000| 65 20 67 6f 6f 64 29 0d | 20 20 20 3b 20 20 20 20 |e good).|   ;    |
|00003010| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003020| 0d 20 20 20 3b 6c 69 6e | 73 65 67 20 64 6f 65 73 |.   ;lin|seg does|
|00003030| 20 64 65 6c 61 79 2c 20 | 6f 73 69 63 6c 20 64 6f | delay, |osicl do|
|00003040| 65 73 20 76 69 62 72 61 | 74 6f 2c 20 6b 34 20 75 |es vibra|to, k4 u|
|00003050| 73 65 73 20 70 75 6c 73 | 65 20 77 61 76 65 20 20 |ses puls|e wave  |
|00003060| 20 20 20 20 20 20 20 20 | 20 20 20 0d 20 20 20 6b |        |   .   k|
|00003070| 33 20 6c 69 6e 73 65 67 | 20 20 30 2c 20 69 64 65 |3 linseg|  0, ide|
|00003080| 6c 31 2c 20 69 64 65 70 | 2c 20 69 73 75 73 2c 20 |l1, idep|, isus, |
|00003090| 69 64 65 70 2c 20 69 72 | 65 6c 2c 20 30 20 20 0d |idep, ir|el, 0  .|
|000030a0| 20 20 20 6b 32 20 6f 73 | 63 69 6c 20 20 20 6b 33 |   k2 os|cil   k3|
|000030b0| 2c 20 69 72 61 74 2c 20 | 31 0d 20 20 20 6b 34 20 |, irat, |1.   k4 |
|000030c0| 6f 73 63 69 6c 20 20 20 | 6b 33 2c 20 28 69 72 61 |oscil   |k3, (ira|
|000030d0| 74 20 2a 20 2e 36 36 36 | 29 2c 20 36 0d 20 20 20 |t * .666|), 6.   |
|000030e0| 0d 20 20 20 3b 67 65 6e | 65 72 61 74 65 20 6f 73 |.   ;gen|erate os|
|000030f0| 63 69 6c 61 74 6f 72 20 | 75 73 69 6e 67 20 6b 31 |cilator |using k1|
|00003100| 2c 20 61 64 64 20 76 69 | 62 72 61 74 6f 20 77 2f |, add vi|brato w/|
|00003110| 6b 32 2c 20 6b 34 0d 20 | 20 20 3b 20 20 20 20 20 |k2, k4. |  ;     |
|00003120| 20 20 20 20 20 20 20 61 | 6d 70 20 20 20 20 20 20 |       a|mp      |
|00003130| 20 66 72 65 71 20 20 20 | 20 20 20 20 20 20 20 20 | freq   |        |
|00003140| 20 20 20 20 20 20 20 77 | 61 76 65 73 68 61 70 65 |       w|aveshape|
|00003150| 0d 20 20 20 61 31 20 20 | 20 6f 73 63 69 6c 20 20 |.   a1  | oscil  |
|00003160| 20 6b 31 2c 20 20 20 20 | 20 20 20 28 69 66 72 65 | k1,    |   (ifre|
|00003170| 71 20 2b 20 6b 32 29 2c | 20 20 20 20 20 20 20 20 |q + k2),|        |
|00003180| 20 20 20 20 20 20 20 31 | 20 20 20 20 20 20 0d 20 |       1|      . |
|00003190| 20 20 61 32 20 20 20 6f | 73 63 69 6c 20 20 28 6b |  a2   o|scil  (k|
|000031a0| 31 20 2a 20 2e 38 29 2c | 20 28 28 69 66 72 65 71 |1 * .8),| ((ifreq|
|000031b0| 20 2a 20 2e 35 29 20 2b | 20 28 6b 34 20 2a 20 2e | * .5) +| (k4 * .|
|000031c0| 35 29 29 2c 20 31 0d 20 | 20 20 0d 20 20 20 61 4d |5)), 1. |  .   aM|
|000031d0| 69 78 53 69 67 20 20 20 | 20 20 20 20 20 20 3d 20 |ixSig   |      = |
|000031e0| 28 61 31 20 2b 20 61 32 | 29 0d 27 27 27 0d 20 20 |(a1 + a2|).'''.  |
|000031f0| 20 73 63 6f 53 61 6d 70 | 6c 65 20 3d 20 27 27 27 | scoSamp|le = '''|
|00003200| 0d 3b 70 31 20 20 20 70 | 32 20 20 20 20 20 70 33 |.;p1   p|2     p3|
|00003210| 20 20 20 20 20 70 34 20 | 20 20 70 35 20 20 20 20 |     p4 |  p5    |
|00003220| 70 36 0d 3b 69 6e 73 74 | 20 73 74 61 72 74 20 20 |p6.;inst| start  |
|00003230| 64 75 72 20 20 20 20 61 | 6d 70 20 20 50 43 48 20 |dur    a|mp  PCH |
|00003240| 20 70 61 6e 0d 69 33 20 | 20 20 20 36 38 2e 30 30 | pan.i3 |   68.00|
|00003250| 20 30 30 2e 35 30 30 20 | 39 35 20 20 20 35 2e 30 | 00.500 |95   5.0|
|00003260| 38 20 20 2e 35 0d 69 33 | 20 20 20 20 36 38 2e 36 |8  .5.i3|    68.6|
|00003270| 36 20 30 30 2e 35 30 30 | 20 37 35 20 20 20 36 2e |6 00.500| 75   6.|
|00003280| 31 31 20 20 2e 35 0d 27 | 27 27 0d 0d 23 2d 2d 2d |11  .5.'|''..#---|
|00003290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 7c 7c |--------|------|||
|000032d0| 7c 7c 7c 7c 7c 7c 7c 7c | 7c 7c 2d 2d 0d 63 6c 61 ||||||||||||--.cla|
|000032e0| 73 73 20 69 6e 73 74 72 | 34 28 69 6e 73 74 72 53 |ss instr|4(instrS|
|000032f0| 68 65 6c 6c 29 3a 0d 20 | 20 20 69 6e 75 6d 62 65 |hell):. |  inumbe|
|00003300| 72 20 20 20 20 20 3d 20 | 34 0d 20 20 20 6e 61 6d |r     = |4.   nam|
|00003310| 65 20 20 20 20 20 20 20 | 3d 20 27 61 64 64 69 74 |e       |= 'addit|
|00003320| 69 76 65 42 65 6c 6c 44 | 61 72 6b 27 0d 20 20 20 |iveBellD|ark'.   |
|00003330| 69 6e 66 6f 20 20 20 20 | 20 20 20 3d 20 27 41 20 |info    |   = 'A |
|00003340| 73 69 6d 70 6c 65 20 62 | 65 6c 6c 20 6d 61 64 65 |simple b|ell made|
|00003350| 20 77 69 74 68 20 31 32 | 20 70 61 72 74 69 61 6c | with 12| partial|
|00003360| 73 2c 20 65 61 63 68 20 | 77 69 74 68 20 74 68 65 |s, each |with the|
|00003370| 69 72 20 6f 77 6e 20 65 | 6e 76 65 6c 6f 70 65 2c |ir own e|nvelope,|
|00003380| 20 74 68 65 6e 20 6d 69 | 78 65 64 20 74 6f 67 65 | then mi|xed toge|
|00003390| 74 68 65 72 2e 20 42 61 | 73 65 64 20 6f 6e 20 64 |ther. Ba|sed on d|
|000033a0| 65 73 69 67 6e 20 62 79 | 20 43 2e 20 52 69 73 73 |esign by| C. Riss|
|000033b0| 65 74 2e 27 0d 20 20 20 | 70 6d 74 72 46 69 65 6c |et.'.   |pmtrFiel|
|000033c0| 64 73 20 3d 20 36 20 23 | 20 74 68 69 73 20 69 73 |ds = 6 #| this is|
|000033d0| 20 74 68 65 20 62 61 73 | 65 20 6e 75 6d 62 65 72 | the bas|e number|
|000033e0| 0d 20 20 20 70 6d 74 72 | 49 6e 66 6f 20 20 20 3d |.   pmtr|Info   =|
|000033f0| 20 7b 7d 20 23 20 68 6f | 6c 64 73 20 64 69 73 63 | {} # ho|lds disc|
|00003400| 72 69 70 74 69 6f 6e 2c | 20 70 72 65 73 65 74 20 |ription,| preset |
|00003410| 66 6f 72 20 65 61 63 68 | 20 70 6d 74 72 20 69 6e |for each| pmtr in|
|00003420| 20 61 20 64 69 63 74 69 | 6f 6e 61 72 79 0d 20 20 | a dicti|onary.  |
|00003430| 20 64 65 66 61 75 6c 74 | 20 20 20 20 3d 20 7b 0d | default|    = {.|
|00003440| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003450| 20 27 72 68 79 74 68 6d | 51 27 20 3a 20 28 28 34 | 'rhythm|Q' : ((4|
|00003460| 2c 20 35 29 2c 20 28 34 | 2c 20 35 29 29 2c 0d 20 |, 5), (4|, 5)),. |
|00003470| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003480| 27 6f 63 74 51 27 20 20 | 20 20 3a 20 28 5b 37 2c |'octQ'  |  : ([7,|
|00003490| 38 5d 2c 20 27 72 61 6e | 64 6f 6d 43 68 6f 69 63 |8], 'ran|domChoic|
|000034a0| 65 27 29 2c 0d 20 20 20 | 20 20 20 20 20 20 20 20 |e'),.   |        |
|000034b0| 20 20 20 20 20 20 27 61 | 6d 70 51 27 20 20 20 20 |      'a|mpQ'    |
|000034c0| 3a 20 28 36 30 2c 37 30 | 2c 20 31 2c 20 27 6c 69 |: (60,70|, 1, 'li|
|000034d0| 6e 65 61 72 55 70 27 29 | 20 2c 0d 20 20 20 20 20 |nearUp')| ,.     |
|000034e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 27 70 61 6e |        |    'pan|
|000034f0| 51 27 20 20 20 20 3a 20 | 28 2e 36 30 2c 20 31 2e |Q'    : |(.60, 1.|
|00003500| 30 2c 20 2e 30 38 2c 20 | 27 6c 69 6e 65 61 72 44 |0, .08, |'linearD|
|00003510| 6f 77 6e 27 29 2c 0d 20 | 20 20 20 20 20 20 20 20 |own'),. |        |
|00003520| 20 20 20 20 20 20 20 7d | 20 0d 20 20 20 61 75 74 |       }| .   aut|
|00003530| 68 6f 72 20 20 20 20 20 | 3d 20 27 27 20 23 20 61 |hor     |= '' # a|
|00003540| 74 74 72 69 62 75 74 69 | 6f 6e 0d 20 20 20 6f 72 |ttributi|on.   or|
|00003550| 63 43 6f 64 65 20 3d 20 | 27 27 27 0d 3b 20 22 49 |cCode = |'''.; "I|
|00003560| 4e 53 54 52 55 4d 45 4e | 54 20 34 2c 20 62 65 6c |NSTRUMEN|T 4, bel|
|00003570| 6c 22 0d 69 6e 73 74 72 | 20 34 0d 20 20 20 69 70 |l".instr| 4.   ip|
|00003580| 61 6e 20 20 20 3d 20 70 | 36 0d 20 20 20 69 64 75 |an   = p|6.   idu|
|00003590| 72 31 20 20 3d 20 28 70 | 33 20 2a 20 2e 35 29 0d |r1  = (p|3 * .5).|
|000035a0| 20 20 20 69 61 6d 70 31 | 20 20 3d 20 28 61 6d 70 |   iamp1|  = (amp|
|000035b0| 64 62 28 70 34 29 20 20 | 2a 20 2e 35 29 0d 20 20 |db(p4)  |* .5).  |
|000035c0| 20 69 66 72 65 71 31 20 | 3d 20 28 63 70 73 70 63 | ifreq1 |= (cpspc|
|000035d0| 68 28 70 35 29 20 2a 20 | 2e 32 29 0d 20 20 20 69 |h(p5) * |.2).   i|
|000035e0| 64 75 72 32 20 20 3d 20 | 28 70 33 20 2a 20 2e 35 |dur2  = |(p3 * .5|
|000035f0| 29 0d 20 20 20 69 61 6d | 70 32 20 20 3d 20 28 61 |).   iam|p2  = (a|
|00003600| 6d 70 64 62 28 70 34 29 | 20 20 2a 20 2e 37 29 0d |mpdb(p4)|  * .7).|
|00003610| 20 20 20 69 66 72 65 71 | 32 20 3d 20 28 63 70 73 |   ifreq|2 = (cps|
|00003620| 70 63 68 28 70 35 29 20 | 2a 20 2e 35 29 0d 20 20 |pch(p5) |* .5).  |
|00003630| 20 69 64 75 72 33 20 20 | 3d 20 28 70 33 20 2a 20 | idur3  |= (p3 * |
|00003640| 2e 35 29 0d 20 20 20 69 | 61 6d 70 33 20 20 3d 20 |.5).   i|amp3  = |
|00003650| 28 61 6d 70 64 62 28 70 | 34 29 20 20 2a 20 31 29 |(ampdb(p|4)  * 1)|
|00003660| 0d 20 20 20 69 66 72 65 | 71 33 20 3d 20 28 63 70 |.   ifre|q3 = (cp|
|00003670| 73 70 63 68 28 70 35 29 | 20 2a 20 2e 38 29 0d 20 |spch(p5)| * .8). |
|00003680| 20 20 69 64 75 72 34 20 | 20 3d 20 28 70 33 20 2a |  idur4 | = (p3 *|
|00003690| 20 2e 36 29 0d 20 20 20 | 69 61 6d 70 34 20 20 3d | .6).   |iamp4  =|
|000036a0| 20 28 61 6d 70 64 62 28 | 70 34 29 20 20 2a 20 31 | (ampdb(|p4)  * 1|
|000036b0| 2e 32 29 0d 20 20 20 69 | 66 72 65 71 34 20 3d 20 |.2).   i|freq4 = |
|000036c0| 28 63 70 73 70 63 68 28 | 70 35 29 20 2a 20 31 29 |(cpspch(|p5) * 1)|
|000036d0| 0d 20 20 20 69 64 75 72 | 35 20 20 3d 20 28 70 33 |.   idur|5  = (p3|
|000036e0| 20 2a 20 2e 37 29 0d 20 | 20 20 69 61 6d 70 35 20 | * .7). |  iamp5 |
|000036f0| 20 3d 20 28 61 6d 70 64 | 62 28 70 34 29 20 20 2a | = (ampd|b(p4)  *|
|00003700| 20 31 2e 35 29 0d 20 20 | 20 69 66 72 65 71 35 20 | 1.5).  | ifreq5 |
|00003710| 3d 20 28 63 70 73 70 63 | 68 28 70 35 29 20 2a 20 |= (cpspc|h(p5) * |
|00003720| 31 2e 32 29 0d 20 20 20 | 69 64 75 72 36 20 20 3d |1.2).   |idur6  =|
|00003730| 20 28 70 33 20 2a 20 31 | 2e 32 29 0d 20 20 20 69 | (p3 * 1|.2).   i|
|00003740| 61 6d 70 36 20 20 3d 20 | 28 61 6d 70 64 62 28 70 |amp6  = |(ampdb(p|
|00003750| 34 29 20 20 2a 20 31 2e | 35 29 0d 20 20 20 69 66 |4)  * 1.|5).   if|
|00003760| 72 65 71 36 20 3d 20 28 | 63 70 73 70 63 68 28 70 |req6 = (|cpspch(p|
|00003770| 35 29 20 2a 20 31 2e 35 | 29 0d 20 20 20 69 64 75 |5) * 1.5|).   idu|
|00003780| 72 37 20 20 3d 20 28 70 | 33 20 2a 20 31 2e 32 29 |r7  = (p|3 * 1.2)|
|00003790| 0d 20 20 20 69 61 6d 70 | 37 20 20 3d 20 28 61 6d |.   iamp|7  = (am|
|000037a0| 70 64 62 28 70 34 29 20 | 20 2a 20 31 2e 36 29 0d |pdb(p4) | * 1.6).|
|000037b0| 20 20 20 69 66 72 65 71 | 37 20 3d 20 28 63 70 73 |   ifreq|7 = (cps|
|000037c0| 70 63 68 28 70 35 29 20 | 2a 20 32 29 0d 20 20 20 |pch(p5) |* 2).   |
|000037d0| 69 64 75 72 38 20 20 3d | 20 28 70 33 20 2a 20 31 |idur8  =| (p3 * 1|
|000037e0| 2e 32 29 0d 20 20 20 69 | 61 6d 70 38 20 20 3d 20 |.2).   i|amp8  = |
|000037f0| 28 61 6d 70 64 62 28 70 | 34 29 20 20 2a 20 31 2e |(ampdb(p|4)  * 1.|
|00003800| 37 29 0d 20 20 20 69 66 | 72 65 71 38 20 3d 20 28 |7).   if|req8 = (|
|00003810| 63 70 73 70 63 68 28 70 | 35 29 20 2a 20 33 29 0d |cpspch(p|5) * 3).|
|00003820| 20 20 20 69 64 75 72 39 | 20 20 3d 20 28 70 33 20 |   idur9|  = (p3 |
|00003830| 2a 20 31 2e 33 29 0d 20 | 20 20 69 61 6d 70 39 20 |* 1.3). |  iamp9 |
|00003840| 20 3d 20 28 61 6d 70 64 | 62 28 70 34 29 20 20 2a | = (ampd|b(p4)  *|
|00003850| 20 31 2e 38 29 0d 20 20 | 20 69 66 72 65 71 39 20 | 1.8).  | ifreq9 |
|00003860| 3d 20 28 63 70 73 70 63 | 68 28 70 35 29 20 2a 20 |= (cpspc|h(p5) * |
|00003870| 33 29 0d 20 20 20 69 64 | 75 72 31 30 20 3d 20 28 |3).   id|ur10 = (|
|00003880| 70 33 20 2a 20 31 2e 34 | 29 0d 20 20 20 69 61 6d |p3 * 1.4|).   iam|
|00003890| 70 31 30 20 3d 20 28 61 | 6d 70 64 62 28 70 34 29 |p10 = (a|mpdb(p4)|
|000038a0| 20 20 2a 20 31 2e 39 29 | 0d 20 20 20 69 66 72 65 |  * 1.9)|.   ifre|
|000038b0| 71 31 30 3d 20 28 63 70 | 73 70 63 68 28 70 35 29 |q10= (cp|spch(p5)|
|000038c0| 20 2a 20 34 2e 35 29 0d | 20 20 20 69 64 75 72 31 | * 4.5).|   idur1|
|000038d0| 31 20 3d 20 28 70 33 20 | 2a 20 31 2e 35 29 0d 20 |1 = (p3 |* 1.5). |
|000038e0| 20 20 69 61 6d 70 31 31 | 20 3d 20 28 61 6d 70 64 |  iamp11| = (ampd|
|000038f0| 62 28 70 34 29 20 20 2a | 20 32 29 0d 20 20 20 69 |b(p4)  *| 2).   i|
|00003900| 66 72 65 71 31 31 3d 20 | 28 63 70 73 70 63 68 28 |freq11= |(cpspch(|
|00003910| 70 35 29 20 2a 20 34 2e | 38 29 0d 20 20 20 0d 20 |p5) * 4.|8).   . |
|00003920| 20 20 6b 6f 73 63 69 6c | 31 20 6f 73 63 69 6c 31 |  koscil|1 oscil1|
|00003930| 69 20 20 20 30 2c 20 69 | 61 6d 70 31 2c 20 69 64 |i   0, i|amp1, id|
|00003940| 75 72 31 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur1, 2. |  aoscil|
|00003950| 69 31 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i1 oscil|i   kosc|
|00003960| 69 6c 31 2c 20 69 66 72 | 65 71 31 2c 20 33 0d 20 |il1, ifr|eq1, 3. |
|00003970| 20 20 6b 6f 73 63 69 6c | 32 20 6f 73 63 69 6c 31 |  koscil|2 oscil1|
|00003980| 69 20 20 20 30 2c 20 69 | 61 6d 70 32 2c 20 69 64 |i   0, i|amp2, id|
|00003990| 75 72 32 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur2, 2. |  aoscil|
|000039a0| 69 32 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i2 oscil|i   kosc|
|000039b0| 69 6c 32 2c 20 69 66 72 | 65 71 32 2c 20 33 0d 20 |il2, ifr|eq2, 3. |
|000039c0| 20 20 6b 6f 73 63 69 6c | 33 20 6f 73 63 69 6c 31 |  koscil|3 oscil1|
|000039d0| 69 20 20 20 30 2c 20 69 | 61 6d 70 33 2c 20 69 64 |i   0, i|amp3, id|
|000039e0| 75 72 33 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur3, 2. |  aoscil|
|000039f0| 69 33 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i3 oscil|i   kosc|
|00003a00| 69 6c 33 2c 20 69 66 72 | 65 71 33 2c 20 33 0d 20 |il3, ifr|eq3, 3. |
|00003a10| 20 20 6b 6f 73 63 69 6c | 34 20 6f 73 63 69 6c 31 |  koscil|4 oscil1|
|00003a20| 69 20 20 20 30 2c 20 69 | 61 6d 70 34 2c 20 69 64 |i   0, i|amp4, id|
|00003a30| 75 72 34 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur4, 2. |  aoscil|
|00003a40| 69 34 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i4 oscil|i   kosc|
|00003a50| 69 6c 34 2c 20 69 66 72 | 65 71 34 2c 20 33 0d 20 |il4, ifr|eq4, 3. |
|00003a60| 20 20 6b 6f 73 63 69 6c | 35 20 6f 73 63 69 6c 31 |  koscil|5 oscil1|
|00003a70| 69 20 20 20 30 2c 20 69 | 61 6d 70 35 2c 20 69 64 |i   0, i|amp5, id|
|00003a80| 75 72 35 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur5, 2. |  aoscil|
|00003a90| 69 35 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i5 oscil|i   kosc|
|00003aa0| 69 6c 35 2c 20 69 66 72 | 65 71 35 2c 20 33 0d 20 |il5, ifr|eq5, 3. |
|00003ab0| 20 20 6b 6f 73 63 69 6c | 36 20 6f 73 63 69 6c 31 |  koscil|6 oscil1|
|00003ac0| 69 20 20 20 30 2c 20 69 | 61 6d 70 36 2c 20 69 64 |i   0, i|amp6, id|
|00003ad0| 75 72 36 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur6, 2. |  aoscil|
|00003ae0| 69 36 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i6 oscil|i   kosc|
|00003af0| 69 6c 36 2c 20 69 66 72 | 65 71 36 2c 20 33 0d 20 |il6, ifr|eq6, 3. |
|00003b00| 20 20 6b 6f 73 63 69 6c | 37 20 6f 73 63 69 6c 31 |  koscil|7 oscil1|
|00003b10| 69 20 20 20 30 2c 20 69 | 61 6d 70 37 2c 20 69 64 |i   0, i|amp7, id|
|00003b20| 75 72 37 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur7, 2. |  aoscil|
|00003b30| 69 37 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i7 oscil|i   kosc|
|00003b40| 69 6c 37 2c 20 69 66 72 | 65 71 37 2c 20 33 0d 20 |il7, ifr|eq7, 3. |
|00003b50| 20 20 6b 6f 73 63 69 6c | 38 20 6f 73 63 69 6c 31 |  koscil|8 oscil1|
|00003b60| 69 20 20 20 30 2c 20 69 | 61 6d 70 38 2c 20 69 64 |i   0, i|amp8, id|
|00003b70| 75 72 38 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur8, 2. |  aoscil|
|00003b80| 69 38 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i8 oscil|i   kosc|
|00003b90| 69 6c 38 2c 20 69 66 72 | 65 71 38 2c 20 33 0d 20 |il8, ifr|eq8, 3. |
|00003ba0| 20 20 6b 6f 73 63 69 6c | 39 20 6f 73 63 69 6c 31 |  koscil|9 oscil1|
|00003bb0| 69 20 20 20 30 2c 20 69 | 61 6d 70 39 2c 20 69 64 |i   0, i|amp9, id|
|00003bc0| 75 72 39 2c 20 32 0d 20 | 20 20 61 6f 73 63 69 6c |ur9, 2. |  aoscil|
|00003bd0| 69 39 20 6f 73 63 69 6c | 69 20 20 20 6b 6f 73 63 |i9 oscil|i   kosc|
|00003be0| 69 6c 39 2c 20 69 66 72 | 65 71 39 2c 20 33 0d 20 |il9, ifr|eq9, 3. |
|00003bf0| 20 20 6b 6f 73 63 69 6c | 31 30 20 6f 73 63 69 6c |  koscil|10 oscil|
|00003c00| 31 69 20 20 20 30 2c 20 | 69 61 6d 70 31 30 2c 20 |1i   0, |iamp10, |
|00003c10| 69 64 75 72 31 30 2c 20 | 32 0d 20 20 20 61 6f 73 |idur10, |2.   aos|
|00003c20| 63 69 6c 69 31 30 20 6f | 73 63 69 6c 69 20 20 20 |cili10 o|scili   |
|00003c30| 6b 6f 73 63 69 6c 31 30 | 2c 20 69 66 72 65 71 31 |koscil10|, ifreq1|
|00003c40| 30 2c 20 33 0d 20 20 20 | 6b 6f 73 63 69 6c 31 31 |0, 3.   |koscil11|
|00003c50| 20 6f 73 63 69 6c 31 69 | 20 20 20 30 2c 20 69 61 | oscil1i|   0, ia|
|00003c60| 6d 70 31 31 2c 20 69 64 | 75 72 31 31 2c 20 32 0d |mp11, id|ur11, 2.|
|00003c70| 20 20 20 61 6f 73 63 69 | 6c 69 31 31 20 6f 73 63 |   aosci|li11 osc|
|00003c80| 69 6c 69 20 20 20 6b 6f | 73 63 69 6c 31 31 2c 20 |ili   ko|scil11, |
|00003c90| 69 66 72 65 71 31 31 2c | 20 33 0d 0d 20 20 20 61 |ifreq11,| 3..   a|
|00003ca0| 4d 69 78 53 69 67 20 20 | 20 20 20 20 20 20 20 3d |MixSig  |       =|
|00003cb0| 20 28 61 6f 73 63 69 6c | 69 31 2b 61 6f 73 63 69 | (aoscil|i1+aosci|
|00003cc0| 6c 69 32 2b 61 6f 73 63 | 69 6c 69 33 2b 61 6f 73 |li2+aosc|ili3+aos|
|00003cd0| 63 69 6c 69 34 2b 61 6f | 73 63 69 6c 69 35 20 2b |cili4+ao|scili5 +|
|00003ce0| 20 61 6f 73 63 69 6c 69 | 36 2b 61 6f 73 63 69 6c | aoscili|6+aoscil|
|00003cf0| 69 37 2b 61 6f 73 63 69 | 6c 69 38 2b 61 6f 73 63 |i7+aosci|li8+aosc|
|00003d00| 69 6c 69 39 2b 61 6f 73 | 63 69 6c 69 31 30 2b 61 |ili9+aos|cili10+a|
|00003d10| 6f 73 63 69 6c 69 31 31 | 29 0d 27 27 27 0d 20 20 |oscili11|).'''.  |
|00003d20| 20 73 63 6f 53 61 6d 70 | 6c 65 20 3d 20 27 27 27 | scoSamp|le = '''|
|00003d30| 0d 3b 70 31 20 20 20 20 | 70 32 20 20 20 20 70 33 |.;p1    |p2    p3|
|00003d40| 20 20 20 20 20 70 34 20 | 20 20 20 70 35 20 20 20 |     p4 |   p5   |
|00003d50| 20 20 20 70 36 0d 3b 69 | 6e 73 74 20 20 73 74 61 |   p6.;i|nst  sta|
|00003d60| 72 74 20 64 75 72 20 20 | 20 20 61 6d 70 20 20 20 |rt dur  |  amp   |
|00003d70| 50 43 48 20 20 20 20 20 | 70 61 6e 0d 69 32 20 20 |PCH     |pan.i2  |
|00003d80| 20 20 31 32 2e 30 30 20 | 31 2e 30 30 30 20 20 39 |  12.00 |1.000  9|
|00003d90| 37 20 20 20 20 37 2e 30 | 39 20 20 20 2e 35 0d 69 |7    7.0|9   .5.i|
|00003da0| 32 20 20 20 20 31 32 2e | 31 30 20 31 2e 30 30 30 |2    12.|10 1.000|
|00003db0| 20 20 38 34 20 20 20 20 | 38 2e 30 39 20 20 20 2e |  84    |8.09   .|
|00003dc0| 35 0d 0d 27 27 27 0d 0d | 23 2d 2d 2d 2d 2d 2d 2d |5..'''..|#-------|
|00003dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003de0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 7c 7c 7c 7c 7c 7c |--------|--|||||||
|00003e10| 7c 7c 7c 7c 7c 7c 2d 2d | 0d 63 6c 61 73 73 20 69 |||||||--|.class i|
|00003e20| 6e 73 74 72 35 28 69 6e | 73 74 72 53 68 65 6c 6c |nstr5(in|strShell|
|00003e30| 29 3a 0d 20 20 20 69 6e | 75 6d 62 65 72 20 20 20 |):.   in|umber   |
|00003e40| 20 20 3d 20 35 0d 20 20 | 20 6e 61 6d 65 20 20 20 |  = 5.  | name   |
|00003e50| 20 20 20 20 3d 20 27 73 | 61 77 57 61 76 65 44 72 |    = 's|awWaveDr|
|00003e60| 6f 6e 65 27 0d 20 20 20 | 69 6e 66 6f 20 20 20 20 |one'.   |info    |
|00003e70| 20 20 20 3d 20 27 41 20 | 73 69 6d 70 6c 65 20 62 |   = 'A |simple b|
|00003e80| 65 6c 6c 20 6d 61 64 65 | 20 77 69 74 68 20 31 32 |ell made| with 12|
|00003e90| 20 70 61 72 74 69 61 6c | 73 2c 20 65 61 63 68 20 | partial|s, each |
|00003ea0| 77 69 74 68 20 74 68 65 | 69 72 20 6f 77 6e 20 65 |with the|ir own e|
|00003eb0| 6e 76 65 6c 6f 70 65 2c | 20 74 68 65 6e 20 6d 69 |nvelope,| then mi|
|00003ec0| 78 65 64 20 74 6f 67 65 | 74 68 65 72 2e 20 42 61 |xed toge|ther. Ba|
|00003ed0| 73 65 64 20 6f 6e 20 64 | 65 73 69 67 6e 20 62 79 |sed on d|esign by|
|00003ee0| 20 43 2e 20 52 69 73 73 | 65 74 2e 27 0d 20 20 20 | C. Riss|et.'.   |
|00003ef0| 70 6d 74 72 46 69 65 6c | 64 73 20 3d 20 36 20 20 |pmtrFiel|ds = 6  |
|00003f00| 23 20 74 6f 74 61 6c 0d | 20 20 20 70 6d 74 72 49 |# total.|   pmtrI|
|00003f10| 6e 66 6f 20 20 20 3d 20 | 7b 7d 20 23 20 68 6f 6c |nfo   = |{} # hol|
|00003f20| 64 73 20 64 69 73 63 72 | 69 70 74 69 6f 6e 2c 20 |ds discr|iption, |
|00003f30| 70 72 65 73 65 74 20 66 | 6f 72 20 65 61 63 68 20 |preset f|or each |
|00003f40| 70 6d 74 72 20 69 6e 20 | 61 20 64 69 63 74 69 6f |pmtr in |a dictio|
|00003f50| 6e 61 72 79 0d 20 20 20 | 64 65 66 61 75 6c 74 20 |nary.   |default |
|00003f60| 20 20 20 3d 20 7b 0d 20 | 20 20 20 20 20 20 20 20 |   = {. |        |
|00003f70| 20 20 20 20 20 20 20 20 | 27 72 68 79 74 68 6d 51 |        |'rhythmQ|
|00003f80| 27 20 3a 20 28 28 32 2c | 20 34 29 2c 20 28 32 2c |' : ((2,| 4), (2,|
|00003f90| 20 31 29 29 2c 20 0d 20 | 20 20 20 20 20 20 20 20 | 1)), . |        |
|00003fa0| 20 20 20 20 20 20 20 20 | 27 6f 63 74 51 27 20 20 |        |'octQ'  |
|00003fb0| 20 20 3a 20 28 5b 37 2c | 38 5d 2c 20 27 72 61 6e |  : ([7,|8], 'ran|
|00003fc0| 64 6f 6d 43 68 6f 69 63 | 65 27 29 2c 0d 20 20 20 |domChoic|e'),.   |
|00003fd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 27 61 |        |      'a|
|00003fe0| 6d 70 51 27 20 20 20 20 | 3a 20 28 36 30 2c 37 30 |mpQ'    |: (60,70|
|00003ff0| 2c 20 32 2c 20 27 6c 69 | 6e 65 61 72 55 70 44 6f |, 2, 'li|nearUpDo|
|00004000| 77 6e 27 29 2c 0d 20 20 | 20 20 20 20 20 20 20 20 |wn'),.  |        |
|00004010| 20 20 20 20 20 20 20 27 | 70 61 6e 51 27 20 20 20 |       '|panQ'   |
|00004020| 20 3a 20 28 2e 32 30 2c | 20 2e 36 30 2c 20 2e 30 | : (.20,| .60, .0|
|00004030| 38 2c 20 27 6c 69 6e 65 | 61 72 44 6f 77 6e 27 29 |8, 'line|arDown')|
|00004040| 2c 20 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |, .     |        |
|00004050| 20 20 20 7d 20 0d 20 20 | 20 61 75 74 68 6f 72 20 |   } .  | author |
|00004060| 20 20 20 20 3d 20 27 27 | 20 23 20 61 74 74 72 69 |    = ''| # attri|
|00004070| 62 75 74 69 6f 6e 0d 20 | 20 20 6f 72 63 43 6f 64 |bution. |  orcCod|
|00004080| 65 20 3d 20 27 27 27 0d | 69 6e 73 74 72 20 35 0d |e = '''.|instr 5.|
|00004090| 20 20 20 69 64 75 72 20 | 20 3d 20 70 33 0d 20 20 |   idur | = p3.  |
|000040a0| 20 69 61 6d 70 20 20 3d | 20 61 6d 70 64 62 28 70 | iamp  =| ampdb(p|
|000040b0| 34 29 0d 20 20 20 69 66 | 72 65 71 20 3d 20 63 70 |4).   if|req = cp|
|000040c0| 73 70 63 68 28 70 35 29 | 0d 20 20 20 69 70 61 6e |spch(p5)|.   ipan|
|000040d0| 20 20 3d 20 70 36 0d 20 | 20 20 0d 20 20 20 3b 67 |  = p6. |  .   ;g|
|000040e0| 65 6e 65 72 61 74 65 20 | 61 70 6c 69 74 75 64 65 |enerate |aplitude|
|000040f0| 20 65 6e 76 65 6c 6f 70 | 65 0d 20 20 20 3b 20 20 | envelop|e.   ;  |
|00004100| 20 20 20 20 20 20 20 20 | 61 6d 70 20 20 20 20 61 |        |amp    a|
|00004110| 74 74 61 63 6b 20 20 20 | 20 20 20 20 64 75 72 20 |ttack   |    dur |
|00004120| 20 20 72 65 6c 65 61 73 | 65 0d 20 20 20 6b 31 20 |  releas|e.   k1 |
|00004130| 6c 69 6e 65 6e 20 20 20 | 69 61 6d 70 2c 20 28 69 |linen   |iamp, (i|
|00004140| 64 75 72 20 2a 20 2e 31 | 38 29 2c 20 69 64 75 72 |dur * .1|8), idur|
|00004150| 2c 20 28 69 64 75 72 20 | 2a 2e 31 39 29 0d 20 20 |, (idur |*.19).  |
|00004160| 20 0d 20 20 20 3b 67 65 | 6e 65 72 61 74 65 20 76 | .   ;ge|nerate v|
|00004170| 69 62 72 61 74 6f 20 65 | 6e 76 65 6c 6f 70 65 20 |ibrato e|nvelope |
|00004180| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004190| 20 20 20 20 20 20 0d 20 | 20 20 69 72 65 6c 20 20 |      . |  irel  |
|000041a0| 3d 20 31 2e 30 30 20 20 | 20 20 20 20 20 20 20 20 |= 1.00  |        |
|000041b0| 20 20 20 20 20 20 20 20 | 20 3b 20 73 65 74 20 76 |        | ; set v|
|000041c0| 69 62 72 61 74 6f 20 72 | 65 6c 65 61 73 65 20 74 |ibrato r|elease t|
|000041d0| 69 6d 65 0d 20 20 20 69 | 64 65 6c 31 20 3d 20 69 |ime.   i|del1 = i|
|000041e0| 64 75 72 20 2d 20 28 2e | 32 35 20 2a 20 69 64 75 |dur - (.|25 * idu|
|000041f0| 72 29 20 20 20 20 3b 20 | 63 61 6c 63 75 6c 61 74 |r)    ; |calculat|
|00004200| 65 20 69 6e 69 74 69 61 | 6c 20 64 65 6c 61 79 20 |e initia|l delay |
|00004210| 28 25 20 6f 66 20 64 75 | 72 29 0d 20 20 20 69 73 |(% of du|r).   is|
|00004220| 75 73 20 20 3d 20 69 64 | 75 72 20 2d 20 28 69 64 |us  = id|ur - (id|
|00004230| 65 6c 31 20 2d 20 69 72 | 65 6c 29 20 20 3b 20 63 |el1 - ir|el)  ; c|
|00004240| 61 6c 63 75 6c 61 74 65 | 20 72 65 6d 61 69 6e 69 |alculate| remaini|
|00004250| 6e 67 20 64 75 72 61 74 | 69 6f 6e 20 20 20 20 20 |ng durat|ion     |
|00004260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004270| 20 20 0d 20 20 20 69 64 | 65 70 20 20 3d 20 32 20 |  .   id|ep  = 2 |
|00004280| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004290| 20 20 20 20 20 3b 20 76 | 69 62 72 61 74 6f 20 64 |     ; v|ibrato d|
|000042a0| 65 70 74 68 20 28 31 2d | 39 20 61 72 65 20 67 6f |epth (1-|9 are go|
|000042b0| 6f 64 29 0d 20 20 20 69 | 72 61 74 20 20 3d 20 31 |od).   i|rat  = 1|
|000042c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000042d0| 20 20 20 20 20 20 3b 20 | 76 69 62 72 61 74 6f 20 |      ; |vibrato |
|000042e0| 72 61 74 65 20 20 28 31 | 2d 39 20 61 72 65 20 67 |rate  (1|-9 are g|
|000042f0| 6f 6f 64 29 0d 20 20 20 | 3b 20 20 20 20 20 20 20 |ood).   |;       |
|00004300| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 0d 20 20 |        |     .  |
|00004310| 20 3b 6c 69 6e 73 65 67 | 20 64 6f 65 73 20 64 65 | ;linseg| does de|
|00004320| 6c 61 79 2c 20 6f 73 69 | 63 6c 20 64 6f 65 73 20 |lay, osi|cl does |
|00004330| 76 69 62 72 61 74 6f 2c | 20 6b 34 20 75 73 65 73 |vibrato,| k4 uses|
|00004340| 20 70 75 6c 73 65 20 77 | 61 76 65 20 20 20 20 20 | pulse w|ave     |
|00004350| 20 20 20 20 20 20 20 20 | 0d 20 20 20 6b 33 20 6c |        |.   k3 l|
|00004360| 69 6e 73 65 67 20 20 30 | 2c 20 69 64 65 6c 31 2c |inseg  0|, idel1,|
|00004370| 20 69 64 65 70 2c 20 69 | 73 75 73 2c 20 69 64 65 | idep, i|sus, ide|
|00004380| 70 2c 20 69 72 65 6c 2c | 20 30 20 20 0d 20 20 20 |p, irel,| 0  .   |
|00004390| 6b 32 20 6f 73 63 69 6c | 20 20 20 6b 33 2c 20 69 |k2 oscil|   k3, i|
|000043a0| 72 61 74 2c 20 20 20 20 | 20 20 20 20 31 0d 20 20 |rat,    |    1.  |
|000043b0| 20 6b 34 20 6f 73 63 69 | 6c 20 20 20 6b 33 2c 20 | k4 osci|l   k3, |
|000043c0| 28 69 72 61 74 2a 2e 36 | 36 36 29 2c 20 36 0d 20 |(irat*.6|66), 6. |
|000043d0| 20 20 0d 20 20 20 3b 67 | 65 6e 65 72 61 74 65 20 |  .   ;g|enerate |
|000043e0| 6f 73 63 69 6c 61 74 6f | 72 20 75 73 69 6e 67 20 |oscilato|r using |
|000043f0| 6b 31 2c 20 61 64 64 20 | 76 69 62 72 61 74 6f 20 |k1, add |vibrato |
|00004400| 77 2f 6b 32 2c 20 6b 34 | 0d 20 20 20 3b 20 20 20 |w/k2, k4|.   ;   |
|00004410| 20 20 20 20 20 20 20 61 | 6d 70 20 20 20 20 20 66 |       a|mp     f|
|00004420| 72 65 71 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |req     |        |
|00004430| 20 20 20 20 20 20 77 61 | 76 65 73 68 61 70 65 0d |      wa|veshape.|
|00004440| 20 20 20 61 31 20 6f 73 | 63 69 6c 20 20 20 6b 31 |   a1 os|cil   k1|
|00004450| 2c 20 20 20 20 20 28 69 | 66 72 65 71 20 2b 20 6b |,     (i|freq + k|
|00004460| 32 29 2c 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2),     |        |
|00004470| 20 34 20 20 20 20 20 20 | 0d 20 20 20 61 32 20 6f | 4      |.   a2 o|
|00004480| 73 63 69 6c 20 20 28 6b | 31 2a 2e 38 29 2c 20 28 |scil  (k|1*.8), (|
|00004490| 28 69 66 72 65 71 20 2a | 20 2e 35 29 20 2b 20 28 |(ifreq *| .5) + (|
|000044a0| 6b 34 20 2a 2e 35 29 29 | 2c 20 31 0d 0d 20 20 20 |k4 *.5))|, 1..   |
|000044b0| 61 4d 69 78 53 69 67 20 | 20 20 20 20 20 20 20 20 |aMixSig |        |
|000044c0| 3d 20 28 61 31 2b 61 32 | 29 0d 27 27 27 0d 20 20 |= (a1+a2|).'''.  |
|000044d0| 20 73 63 6f 53 61 6d 70 | 6c 65 20 3d 20 27 27 27 | scoSamp|le = '''|
|000044e0| 0d 3b 70 31 20 20 20 20 | 70 32 20 20 20 20 70 33 |.;p1    |p2    p3|
|000044f0| 20 20 20 20 20 70 34 20 | 20 20 20 70 35 20 20 20 |     p4 |   p5   |
|00004500| 20 20 20 70 36 0d 69 6e | 73 74 20 20 73 74 61 72 |   p6.in|st  star|
|00004510| 74 20 64 75 72 20 20 20 | 20 61 6d 70 20 20 20 50 |t dur   | amp   P|
|00004520| 43 48 20 20 20 20 20 70 | 61 6e 0d 69 35 20 20 20 |CH     p|an.i5   |
|00004530| 20 31 32 2e 30 30 20 31 | 2e 30 30 30 20 20 39 35 | 12.00 1|.000  95|
|00004540| 20 20 20 20 37 2e 30 39 | 20 20 20 2e 35 0d 69 35 |    7.09|   .5.i5|
|00004550| 20 20 20 20 31 32 2e 31 | 30 20 31 2e 30 30 30 20 |    12.1|0 1.000 |
|00004560| 20 38 34 20 20 20 20 38 | 2e 30 39 20 20 20 2e 35 | 84    8|.09   .5|
|00004570| 0d 27 27 27 0d 0d 23 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.'''..#-|--------|
|00004580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045b0| 2d 2d 2d 2d 2d 2d 2d 2d | 7c 7c 7c 7c 7c 7c 7c 7c |--------||||||||||
|000045c0| 7c 7c 7c 7c 2d 2d 0d 63 | 6c 61 73 73 20 69 6e 73 |||||--.c|lass ins|
|000045d0| 74 72 36 28 69 6e 73 74 | 72 53 68 65 6c 6c 29 3a |tr6(inst|rShell):|
|000045e0| 0d 20 20 20 69 6e 75 6d | 62 65 72 20 20 20 20 20 |.   inum|ber     |
|000045f0| 3d 20 36 0d 20 20 20 6e | 61 6d 65 20 20 20 20 20 |= 6.   n|ame     |
|00004600| 20 20 3d 20 27 70 6c 75 | 63 6b 46 6f 72 6d 61 6e |  = 'plu|ckForman|
|00004610| 74 27 0d 20 20 20 69 6e | 66 6f 20 20 20 20 20 20 |t'.   in|fo      |
|00004620| 20 3d 20 27 41 20 70 6c | 75 63 6b 20 74 68 61 74 | = 'A pl|uck that|
|00004630| 20 73 6c 6f 77 6c 79 20 | 6d 6f 72 70 68 73 20 69 | slowly |morphs i|
|00004640| 6e 74 6f 20 61 20 76 6f | 63 61 6c 2c 20 66 6f 72 |nto a vo|cal, for|
|00004650| 6d 61 6e 74 20 64 65 72 | 69 76 65 64 20 73 6f 75 |mant der|ived sou|
|00004660| 6e 64 2e 27 0d 20 20 20 | 70 6d 74 72 46 69 65 6c |nd.'.   |pmtrFiel|
|00004670| 64 73 20 3d 20 31 36 20 | 23 20 74 68 69 73 20 69 |ds = 16 |# this i|
|00004680| 73 20 74 68 65 20 62 61 | 73 65 20 6e 75 6d 62 65 |s the ba|se numbe|
|00004690| 72 0d 20 20 20 70 6d 74 | 72 49 6e 66 6f 20 20 20 |r.   pmt|rInfo   |
|000046a0| 3d 20 7b 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |= {.    |        |
|000046b0| 20 20 20 20 20 27 70 6d | 74 72 37 27 20 20 20 3a |     'pm|tr7'   :|
|000046c0| 20 27 69 70 6c 75 63 6b | 61 6d 70 2c 20 25 20 6f | 'ipluck|amp, % o|
|000046d0| 66 20 74 6f 74 61 6c 20 | 61 6d 70 2c 20 31 3d 64 |f total |amp, 1=d|
|000046e0| 42 20 61 6d 70 20 61 73 | 20 69 6e 20 70 34 27 2c |B amp as| in p4',|
|000046f0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00004700| 20 20 27 70 6d 74 72 38 | 27 20 20 20 3a 20 27 69 |  'pmtr8|'   : 'i|
|00004710| 70 6c 75 63 6b 64 75 72 | 2c 20 25 20 6f 66 20 74 |pluckdur|, % of t|
|00004720| 6f 74 61 6c 20 64 75 72 | 2c 20 31 3d 65 6e 74 69 |otal dur|, 1=enti|
|00004730| 72 65 20 64 75 72 20 6f | 66 20 6e 6f 74 65 27 2c |re dur o|f note',|
|00004740| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00004750| 20 20 27 70 6d 74 72 39 | 27 20 20 20 3a 20 27 69 |  'pmtr9|'   : 'i|
|00004760| 66 6d 61 6d 70 2c 20 25 | 20 6f 66 20 74 6f 74 61 |fmamp, %| of tota|
|00004770| 6c 20 61 6d 70 2c 20 31 | 3d 64 42 20 61 6d 70 20 |l amp, 1|=dB amp |
|00004780| 61 73 20 69 6e 20 70 34 | 27 2c 20 0d 20 20 20 20 |as in p4|', .    |
|00004790| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 27 70 6d |        |     'pm|
|000047a0| 74 72 31 30 27 20 20 3a | 20 27 69 66 6d 72 69 73 |tr10'  :| 'ifmris|
|000047b0| 65 2c 20 25 20 6f 66 20 | 74 6f 74 61 6c 20 64 75 |e, % of |total du|
|000047c0| 72 2c 20 31 3d 65 6e 74 | 69 72 65 20 64 75 72 20 |r, 1=ent|ire dur |
|000047d0| 6f 66 20 6e 6f 74 65 27 | 2c 20 0d 20 20 20 20 20 |of note'|, .     |
|000047e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 27 70 6d 74 |        |    'pmt|
|000047f0| 72 31 31 27 20 20 3a 20 | 27 69 66 6d 64 65 63 2c |r11'  : |'ifmdec,|
|00004800| 20 25 20 6f 66 20 74 6f | 74 61 6c 20 64 75 72 61 | % of to|tal dura|
|00004810| 74 69 6f 6e 27 2c 20 0d | 20 20 20 20 20 20 20 20 |tion', .|        |
|00004820| 20 20 20 20 20 20 20 20 | 20 27 70 6d 74 72 31 32 |        | 'pmtr12|
|00004830| 27 20 20 3a 20 27 69 6e | 64 65 78 27 2c 20 20 20 |'  : 'in|dex',   |
|00004840| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00004850| 20 20 27 70 6d 74 72 31 | 33 27 20 20 3a 20 27 69 |  'pmtr1|3'  : 'i|
|00004860| 76 69 62 64 65 70 74 68 | 27 2c 20 20 0d 20 20 20 |vibdepth|',  .   |
|00004870| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 27 70 |        |      'p|
|00004880| 6d 74 72 31 34 27 20 20 | 3a 20 27 69 76 69 62 72 |mtr14'  |: 'ivibr|
|00004890| 61 74 65 27 2c 0d 20 20 | 20 20 20 20 20 20 20 20 |ate',.  |        |
|000048a0| 20 20 20 20 20 20 20 27 | 70 6d 74 72 31 35 27 20 |       '|pmtr15' |
|000048b0| 20 3a 20 27 69 66 6f 72 | 6d 61 6e 74 61 6d 70 27 | : 'ifor|mantamp'|
|000048c0| 2c 20 20 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |,  .    |        |
|000048d0| 20 20 20 20 20 27 70 6d | 74 72 31 36 27 20 20 3a |     'pm|tr16'  :|
|000048e0| 20 27 69 66 6f 72 6d 61 | 6e 74 72 69 73 65 27 2c | 'iforma|ntrise',|
|000048f0| 20 20 20 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |   .    |        |
|00004900| 20 20 20 20 7d 20 23 20 | 68 6f 6c 64 73 20 64 69 |    } # |holds di|
|00004910| 73 63 72 69 70 74 69 6f | 6e 2c 20 70 72 65 73 65 |scriptio|n, prese|
|00004920| 74 20 66 6f 72 20 65 61 | 63 68 20 70 6d 74 72 20 |t for ea|ch pmtr |
|00004930| 69 6e 20 61 20 64 69 63 | 74 69 6f 6e 61 72 79 0d |in a dic|tionary.|
|00004940| 20 20 20 64 65 66 61 75 | 6c 74 20 20 20 20 3d 20 |   defau|lt    = |
|00004950| 7b 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |{.      |        |
|00004960| 20 20 20 27 72 68 79 74 | 68 6d 51 27 20 3a 20 28 |   'rhyt|hmQ' : (|
|00004970| 28 32 2c 20 33 29 2c 20 | 28 32 2c 20 39 29 29 2c |(2, 3), |(2, 9)),|
|00004980| 20 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .      |        |
|00004990| 20 20 20 27 6f 63 74 51 | 27 20 20 20 20 3a 20 28 |   'octQ|'    : (|
|000049a0| 5b 37 2c 38 5d 2c 20 20 | 20 27 72 61 6e 64 6f 6d |[7,8],  | 'random|
|000049b0| 43 68 6f 69 63 65 27 29 | 2c 0d 20 20 20 20 20 20 |Choice')|,.      |
|000049c0| 20 20 20 20 20 20 20 20 | 20 20 20 27 61 6d 70 51 |        |   'ampQ|
|000049d0| 27 20 20 20 20 3a 20 28 | 36 30 2c 37 30 2c 20 34 |'    : (|60,70, 4|
|000049e0| 2c 20 27 6c 69 6e 65 61 | 72 44 6f 77 6e 27 29 20 |, 'linea|rDown') |
|000049f0| 2c 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |,.      |        |
|00004a00| 20 20 20 27 70 61 6e 51 | 27 20 20 20 20 3a 20 28 |   'panQ|'    : (|
|00004a10| 2e 33 30 2c 20 2e 37 30 | 2c 20 2e 30 38 2c 20 27 |.30, .70|, .08, '|
|00004a20| 6c 69 6e 65 61 72 44 6f | 77 6e 27 29 2c 20 0d 20 |linearDo|wn'), . |
|00004a30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004a40| 27 70 6d 74 72 37 27 20 | 20 20 3a 20 28 2e 38 2c |'pmtr7' |  : (.8,|
|00004a50| 20 2e 39 2c 20 2e 30 35 | 2c 20 27 6c 69 6e 65 61 | .9, .05|, 'linea|
|00004a60| 72 55 70 27 29 2c 0d 20 | 20 20 20 20 20 20 20 20 |rUp'),. |        |
|00004a70| 20 20 20 20 20 20 20 20 | 27 70 6d 74 72 38 27 20 |        |'pmtr8' |
|00004a80| 20 20 3a 20 28 2e 32 2c | 20 2e 34 2c 20 2e 30 35 |  : (.2,| .4, .05|
|00004a90| 2c 20 27 6c 69 6e 65 61 | 72 55 70 27 29 2c 0d 20 |, 'linea|rUp'),. |
|00004aa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004ab0| 27 70 6d 74 72 39 27 20 | 20 20 3a 20 28 2e 37 2c |'pmtr9' |  : (.7,|
|00004ac0| 20 2e 38 2c 20 2e 30 35 | 2c 20 27 6c 69 6e 65 61 | .8, .05|, 'linea|
|00004ad0| 72 55 70 27 29 2c 20 0d | 20 20 20 20 20 20 20 20 |rUp'), .|        |
|00004ae0| 20 20 20 20 20 20 20 20 | 20 27 70 6d 74 72 31 30 |        | 'pmtr10|
|00004af0| 27 20 20 3a 20 28 2e 32 | 2c 20 2e 33 35 2c 20 2e |'  : (.2|, .35, .|
|00004b00| 30 35 2c 20 27 6c 69 6e | 65 61 72 55 70 27 29 2c |05, 'lin|earUp'),|
|00004b10| 20 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .      |        |
|00004b20| 20 20 20 27 70 6d 74 72 | 31 31 27 20 20 3a 20 28 |   'pmtr|11'  : (|
|00004b30| 2e 33 2c 20 2e 34 30 2c | 20 2e 30 35 2c 20 27 6c |.3, .40,| .05, 'l|
|00004b40| 69 6e 65 61 72 55 70 27 | 29 2c 20 0d 20 20 20 20 |inearUp'|), .    |
|00004b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 27 70 6d |        |     'pm|
|00004b60| 74 72 31 32 27 20 20 3a | 20 28 36 2c 20 38 2c 20 |tr12'  :| (6, 8, |
|00004b70| 31 2c 20 27 6c 69 6e 65 | 61 72 55 70 44 6f 77 6e |1, 'line|arUpDown|
|00004b80| 27 29 2c 20 20 20 0d 20 | 20 20 20 20 20 20 20 20 |'),   . |        |
|00004b90| 20 20 20 20 20 20 20 20 | 27 70 6d 74 72 31 33 27 |        |'pmtr13'|
|00004ba0| 20 20 3a 20 28 31 2c 20 | 31 2c 20 30 2c 20 27 6c |  : (1, |1, 0, 'l|
|00004bb0| 69 6e 65 61 72 55 70 44 | 6f 77 6e 27 29 2c 20 20 |inearUpD|own'),  |
|00004bc0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00004bd0| 20 20 27 70 6d 74 72 31 | 34 27 20 20 3a 20 28 34 |  'pmtr1|4'  : (4|
|00004be0| 2c 20 36 2c 20 31 2c 20 | 27 6c 69 6e 65 61 72 55 |, 6, 1, |'linearU|
|00004bf0| 70 27 29 2c 0d 20 20 20 | 20 20 20 20 20 20 20 20 |p'),.   |        |
|00004c00| 20 20 20 20 20 20 27 70 | 6d 74 72 31 35 27 20 20 |      'p|mtr15'  |
|00004c10| 3a 20 28 33 2c 20 33 2c | 20 30 2c 20 27 6c 69 6e |: (3, 3,| 0, 'lin|
|00004c20| 65 61 72 55 70 44 6f 77 | 6e 27 29 2c 20 20 0d 20 |earUpDow|n'),  . |
|00004c30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004c40| 27 70 6d 74 72 31 36 27 | 20 20 3a 20 28 2e 35 2c |'pmtr16'|  : (.5,|
|00004c50| 20 2e 38 2c 20 2e 31 2c | 20 27 6c 69 6e 65 61 72 | .8, .1,| 'linear|
|00004c60| 55 70 27 29 2c 20 20 20 | 0d 20 20 20 20 20 20 20 |Up'),   |.       |
|00004c70| 20 20 20 20 20 20 20 20 | 20 7d 20 0d 20 20 20 61 |        | } .   a|
|00004c80| 75 74 68 6f 72 20 20 20 | 20 20 3d 20 27 27 20 23 |uthor   |  = '' #|
|00004c90| 20 61 74 74 72 69 62 75 | 74 69 6f 6e 0d 20 20 20 | attribu|tion.   |
|00004ca0| 6f 72 63 43 6f 64 65 20 | 3d 20 27 27 27 0d 69 6e |orcCode |= '''.in|
|00004cb0| 73 74 72 20 36 20 20 20 | 20 20 20 20 20 20 20 20 |str 6   |        |
|00004cc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 0d 20 |        |      . |
|00004cd0| 20 20 69 61 6d 70 20 20 | 20 20 20 20 20 20 20 3d |  iamp  |       =|
|00004ce0| 20 61 6d 70 64 62 28 70 | 34 29 20 2f 20 32 20 20 | ampdb(p|4) / 2  |
|00004cf0| 3b 20 61 6d 70 6c 69 74 | 75 64 65 2c 20 73 63 61 |; amplit|ude, sca|
|00004d00| 6c 65 64 20 66 6f 72 20 | 74 77 6f 20 73 6f 75 72 |led for |two sour|
|00004d10| 63 65 73 0d 20 20 20 69 | 66 72 65 71 20 20 20 20 |ces.   i|freq    |
|00004d20| 20 20 20 20 3d 20 63 70 | 73 70 63 68 28 70 35 29 |    = cp|spch(p5)|
|00004d30| 0d 20 20 20 0d 20 20 20 | 69 70 61 6e 20 20 20 20 |.   .   |ipan    |
|00004d40| 20 20 20 20 20 3d 20 70 | 36 20 20 0d 20 20 20 69 |     = p|6  .   i|
|00004d50| 70 6c 75 63 6b 61 6d 70 | 20 20 20 20 3d 20 70 37 |pluckamp|    = p7|
|00004d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 |        |      ; |
|00004d70| 25 20 6f 66 20 74 6f 74 | 61 6c 20 61 6d 70 2c 20 |% of tot|al amp, |
|00004d80| 31 3d 64 42 20 61 6d 70 | 20 61 73 20 69 6e 20 70 |1=dB amp| as in p|
|00004d90| 34 0d 20 20 20 69 70 6c | 75 63 6b 64 75 72 20 20 |4.   ipl|uckdur  |
|00004da0| 20 20 3d 20 70 38 20 2a | 20 70 33 20 20 20 20 20 |  = p8 *| p3     |
|00004db0| 20 20 20 20 3b 20 25 20 | 6f 66 20 74 6f 74 61 6c |    ; % |of total|
|00004dc0| 20 64 75 72 2c 20 31 3d | 65 6e 74 69 72 65 20 64 | dur, 1=|entire d|
|00004dd0| 75 72 20 6f 66 20 6e 6f | 74 65 0d 20 20 20 69 70 |ur of no|te.   ip|
|00004de0| 6c 75 63 6b 6f 66 66 20 | 20 20 20 3d 20 70 33 20 |luckoff |   = p3 |
|00004df0| 2d 20 69 70 6c 75 63 6b | 64 75 72 0d 20 20 20 0d |- ipluck|dur.   .|
|00004e00| 20 20 20 69 66 6d 61 6d | 70 20 20 20 20 20 20 20 |   ifmam|p       |
|00004e10| 3d 20 70 39 20 20 20 20 | 20 20 20 20 20 20 20 20 |= p9    |        |
|00004e20| 20 20 20 3b 20 25 20 6f | 66 20 74 6f 74 61 6c 20 |   ; % o|f total |
|00004e30| 61 6d 70 2c 20 31 3d 64 | 42 20 61 6d 70 20 61 73 |amp, 1=d|B amp as|
|00004e40| 20 69 6e 20 70 34 0d 20 | 20 20 69 66 6d 72 69 73 | in p4. |  ifmris|
|00004e50| 65 20 20 20 20 20 20 3d | 20 70 31 30 20 2a 20 70 |e      =| p10 * p|
|00004e60| 33 20 20 20 20 20 20 20 | 20 20 3b 20 25 20 6f 66 |3       |  ; % of|
|00004e70| 20 74 6f 74 61 6c 20 64 | 75 72 2c 20 31 3d 65 6e | total d|ur, 1=en|
|00004e80| 74 69 72 65 20 64 75 72 | 20 6f 66 20 6e 6f 74 65 |tire dur| of note|
|00004e90| 0d 20 20 20 69 66 6d 64 | 65 63 20 20 20 20 20 20 |.   ifmd|ec      |
|00004ea0| 20 3d 20 70 31 31 20 2a | 20 70 33 20 20 20 20 20 | = p11 *| p3     |
|00004eb0| 20 20 20 20 3b 20 25 20 | 6f 66 20 74 6f 74 61 6c |    ; % |of total|
|00004ec0| 20 64 75 72 61 74 69 6f | 6e 0d 20 20 20 69 66 6d | duratio|n.   ifm|
|00004ed0| 6f 66 66 20 20 20 20 20 | 20 20 3d 20 70 33 20 2d |off     |  = p3 -|
|00004ee0| 20 28 69 66 6d 72 69 73 | 65 20 2b 20 69 66 6d 64 | (ifmris|e + ifmd|
|00004ef0| 65 63 29 0d 20 20 20 69 | 6e 64 65 78 20 20 20 20 |ec).   i|ndex    |
|00004f00| 20 20 20 20 3d 20 70 31 | 32 0d 20 20 20 69 76 69 |    = p1|2.   ivi|
|00004f10| 62 64 65 70 74 68 20 20 | 20 20 3d 20 70 31 33 0d |bdepth  |  = p13.|
|00004f20| 20 20 20 69 76 69 62 72 | 61 74 65 20 20 20 20 20 |   ivibr|ate     |
|00004f30| 3d 20 70 31 34 0d 20 20 | 20 69 66 6f 72 6d 61 6e |= p14.  | iforman|
|00004f40| 74 61 6d 70 20 20 3d 20 | 70 31 35 20 20 20 20 20 |tamp  = |p15     |
|00004f50| 20 20 20 20 20 20 20 3b | 20 25 20 6f 66 20 74 6f |       ;| % of to|
|00004f60| 74 61 6c 20 61 6d 70 2c | 20 31 3d 64 42 20 61 6d |tal amp,| 1=dB am|
|00004f70| 70 20 61 73 20 69 6e 20 | 70 34 0d 20 20 20 69 66 |p as in |p4.   if|
|00004f80| 6f 72 6d 61 6e 74 72 69 | 73 65 20 3d 20 70 31 36 |ormantri|se = p16|
|00004f90| 20 2a 20 70 33 20 20 20 | 20 20 20 20 3b 20 25 20 | * p3   |    ; % |
|00004fa0| 6f 66 20 74 6f 74 61 6c | 20 64 75 72 2c 20 31 3d |of total| dur, 1=|
|00004fb0| 65 6e 74 69 72 65 20 64 | 75 72 20 6f 66 20 6e 6f |entire d|ur of no|
|00004fc0| 74 65 0d 20 20 20 69 66 | 6f 72 6d 61 6e 74 64 65 |te.   if|ormantde|
|00004fd0| 63 20 20 3d 20 70 33 20 | 2d 20 69 66 6f 72 6d 61 |c  = p3 |- iforma|
|00004fe0| 6e 74 72 69 73 65 0d 20 | 20 20 0d 20 20 20 6b 70 |ntrise. |  .   kp|
|00004ff0| 6c 75 63 6b 20 20 20 20 | 20 20 20 6c 69 6e 73 65 |luck    |   linse|
|00005000| 67 20 20 20 20 69 70 6c | 75 63 6b 61 6d 70 2c 20 |g    ipl|uckamp, |
|00005010| 69 70 6c 75 63 6b 64 75 | 72 2c 20 30 2c 20 69 70 |ipluckdu|r, 0, ip|
|00005020| 6c 75 63 6b 6f 66 66 2c | 20 30 0d 20 20 20 61 70 |luckoff,| 0.   ap|
|00005030| 6c 75 63 6b 31 20 20 20 | 20 20 20 70 6c 75 63 6b |luck1   |   pluck|
|00005040| 20 20 20 20 20 69 61 6d | 70 2c 20 69 66 72 65 71 |     iam|p, ifreq|
|00005050| 2c 20 69 66 72 65 71 2c | 20 30 2c 20 31 0d 20 20 |, ifreq,| 0, 1.  |
|00005060| 20 61 70 6c 75 63 6b 32 | 20 20 20 20 20 20 70 6c | apluck2|      pl|
|00005070| 75 63 6b 20 20 20 20 20 | 69 61 6d 70 2c 20 69 66 |uck     |iamp, if|
|00005080| 72 65 71 20 2a 20 31 2e | 30 30 33 2c 20 69 66 72 |req * 1.|003, ifr|
|00005090| 65 71 20 2a 20 31 2e 30 | 30 33 2c 20 30 2c 20 31 |eq * 1.0|03, 0, 1|
|000050a0| 0d 20 20 20 61 70 6c 75 | 63 6b 20 20 20 20 20 20 |.   aplu|ck      |
|000050b0| 20 3d 20 20 20 20 20 20 | 20 20 20 6b 70 6c 75 63 | =      |   kpluc|
|000050c0| 6b 20 2a 20 28 61 70 6c | 75 63 6b 31 2b 61 70 6c |k * (apl|uck1+apl|
|000050d0| 75 63 6b 32 29 0d 20 20 | 20 0d 20 20 20 6b 66 6d |uck2).  | .   kfm|
|000050e0| 20 20 20 20 20 20 20 20 | 20 20 6c 69 6e 73 65 67 |        |  linseg|
|000050f0| 20 20 20 20 30 2c 20 69 | 66 6d 72 69 73 65 2c 20 |    0, i|fmrise, |
|00005100| 69 66 6d 61 6d 70 2c 20 | 69 66 6d 64 65 63 2c 20 |ifmamp, |ifmdec, |
|00005110| 30 2c 20 69 66 6d 6f 66 | 66 2c 20 30 0d 20 20 20 |0, ifmof|f, 0.   |
|00005120| 6b 6e 64 78 20 20 20 20 | 20 20 20 20 20 3d 20 20 |kndx    |     =  |
|00005130| 20 20 20 20 20 20 20 6b | 66 6d 20 2a 20 69 6e 64 |       k|fm * ind|
|00005140| 65 78 0d 20 20 20 61 66 | 6d 31 20 20 20 20 20 20 |ex.   af|m1      |
|00005150| 20 20 20 66 6f 73 63 69 | 6c 20 20 20 20 69 61 6d |   fosci|l    iam|
|00005160| 70 2c 20 69 66 72 65 71 | 2c 20 31 2c 20 37 2c 20 |p, ifreq|, 1, 7, |
|00005170| 6b 6e 64 78 2c 20 31 0d | 20 20 20 61 66 6d 32 20 |kndx, 1.|   afm2 |
|00005180| 20 20 20 20 20 20 20 20 | 66 6f 73 63 69 6c 20 20 |        |foscil  |
|00005190| 20 20 69 61 6d 70 2c 20 | 69 66 72 65 71 20 2a 20 |  iamp, |ifreq * |
|000051a0| 31 2e 30 30 33 2c 20 31 | 2e 30 30 33 2c 20 32 2e |1.003, 1|.003, 2.|
|000051b0| 30 30 33 2c 20 6b 6e 64 | 78 2c 20 31 0d 20 20 20 |003, knd|x, 1.   |
|000051c0| 61 66 6d 20 20 20 20 20 | 20 20 20 20 20 3d 20 20 |afm     |     =  |
|000051d0| 20 20 20 20 20 20 20 6b | 66 6d 20 2a 20 28 61 66 |       k|fm * (af|
|000051e0| 6d 31 2b 61 66 6d 32 29 | 0d 20 20 20 0d 20 20 20 |m1+afm2)|.   .   |
|000051f0| 6b 66 72 6d 6e 74 20 20 | 20 20 20 20 20 6c 69 6e |kfrmnt  |     lin|
|00005200| 73 65 67 20 20 20 20 30 | 2c 20 69 66 6f 72 6d 61 |seg    0|, iforma|
|00005210| 6e 74 72 69 73 65 2c 20 | 69 66 6f 72 6d 61 6e 74 |ntrise, |iformant|
|00005220| 61 6d 70 2c 20 69 66 6f | 72 6d 61 6e 74 64 65 63 |amp, ifo|rmantdec|
|00005230| 2c 20 30 0d 20 20 20 6b | 76 69 62 20 20 20 20 20 |, 0.   k|vib     |
|00005240| 20 20 20 20 6f 73 63 69 | 6c 20 20 20 20 20 69 76 |    osci|l     iv|
|00005250| 69 62 64 65 70 74 68 2c | 20 69 76 69 62 72 61 74 |ibdepth,| ivibrat|
|00005260| 65 2c 20 31 0d 20 20 20 | 61 66 72 6d 6e 74 31 20 |e, 1.   |afrmnt1 |
|00005270| 20 20 20 20 20 66 6f 66 | 20 20 20 20 20 20 20 69 |     fof|       i|
|00005280| 61 6d 70 2c 20 69 66 72 | 65 71 20 2b 20 6b 76 69 |amp, ifr|eq + kvi|
|00005290| 62 2c 20 36 35 30 2c 20 | 30 2c 20 34 30 2c 20 2e |b, 650, |0, 40, .|
|000052a0| 30 30 33 2c 20 2e 30 31 | 37 2c 20 2e 30 30 37 2c |003, .01|7, .007,|
|000052b0| 20 34 2c 20 31 2c 20 37 | 2c 20 70 33 0d 20 20 20 | 4, 1, 7|, p3.   |
|000052c0| 61 66 72 6d 6e 74 32 20 | 20 20 20 20 20 66 6f 66 |afrmnt2 |     fof|
|000052d0| 20 20 20 20 20 20 20 69 | 61 6d 70 2c 20 28 69 66 |       i|amp, (if|
|000052e0| 72 65 71 2a 31 2e 30 30 | 31 29 2b 6b 76 69 62 2a |req*1.00|1)+kvib*|
|000052f0| 2e 30 30 39 2c 20 36 35 | 30 2c 20 30 2c 20 34 30 |.009, 65|0, 0, 40|
|00005300| 2c 20 2e 30 30 33 2c 2e | 30 31 37 2c 2e 30 30 37 |, .003,.|017,.007|
|00005310| 2c 20 31 30 2c 31 2c 37 | 2c 70 33 0d 20 20 20 61 |, 10,1,7|,p3.   a|
|00005320| 66 6f 72 6d 6e 74 20 20 | 20 20 20 20 3d 20 20 20 |formnt  |    =   |
|00005330| 20 20 20 20 20 20 6b 66 | 72 6d 6e 74 20 2a 20 28 |      kf|rmnt * (|
|00005340| 61 66 72 6d 6e 74 31 2b | 61 66 72 6d 6e 74 32 29 |afrmnt1+|afrmnt2)|
|00005350| 0d 0d 20 20 20 61 4d 69 | 78 53 69 67 20 20 20 20 |..   aMi|xSig    |
|00005360| 20 20 20 20 20 3d 20 28 | 61 70 6c 75 63 6b 20 2b |     = (|apluck +|
|00005370| 20 61 66 6d 20 2b 20 61 | 66 6f 72 6d 6e 74 29 0d | afm + a|formnt).|
|00005380| 27 27 27 0d 20 20 20 73 | 63 6f 53 61 6d 70 6c 65 |'''.   s|coSample|
|00005390| 20 3d 20 27 27 27 0d 20 | 20 20 20 20 20 20 20 20 | = '''. |        |
|000053a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000053b0| 20 20 20 3b 76 61 6c 75 | 65 73 20 62 2f 6e 20 30 |   ;valu|es b/n 0|
|000053c0| 20 26 20 31 2e 0d 20 20 | 20 20 20 20 20 20 20 20 | & 1..  |        |
|000053d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000053e0| 20 20 3b 70 36 20 20 20 | 20 70 37 20 20 20 20 70 |  ;p6   | p7    p|
|000053f0| 38 20 20 70 39 20 20 20 | 70 31 30 20 20 20 20 70 |8  p9   |p10    p|
|00005400| 31 31 20 20 70 31 32 20 | 20 70 31 33 20 20 20 70 |11  p12 | p13   p|
|00005410| 31 34 20 20 70 31 35 20 | 20 20 70 31 36 20 20 20 |14  p15 |  p16   |
|00005420| 20 20 20 0d 3b 69 6e 73 | 20 73 74 20 20 20 20 64 |   .;ins| st    d|
|00005430| 72 20 20 20 61 6d 70 20 | 20 20 50 43 48 20 20 20 |r   amp |  PCH   |
|00005440| 20 70 61 6e 20 20 20 70 | 6c 6b 6d 70 20 70 6c 6b | pan   p|lkmp plk|
|00005450| 64 72 20 66 6d 70 20 66 | 6d 72 69 73 20 66 6d 64 |dr fmp f|mris fmd|
|00005460| 65 63 20 69 6e 64 78 20 | 76 62 64 70 20 76 62 72 |ec indx |vbdp vbr|
|00005470| 74 20 66 72 6d 70 20 66 | 72 69 73 0d 69 31 33 20 |t frmp f|ris.i13 |
|00005480| 35 32 2e 31 31 20 20 34 | 20 20 20 20 38 30 20 20 |52.11  4|    80  |
|00005490| 20 37 2e 30 39 20 20 2e | 35 20 20 20 20 20 2e 38 | 7.09  .|5     .8|
|000054a0| 20 20 20 2e 33 20 20 20 | 2e 37 20 20 20 2e 32 20 |   .3   |.7   .2 |
|000054b0| 20 20 2e 33 35 20 20 20 | 20 38 20 20 20 31 20 20 |  .35   | 8   1  |
|000054c0| 20 35 20 20 20 33 20 20 | 20 2e 35 0d 69 31 33 20 | 5   3  | .5.i13 |
|000054d0| 35 33 2e 34 34 20 20 34 | 20 20 20 20 38 30 20 20 |53.44  4|    80  |
|000054e0| 20 37 2e 30 39 20 20 2e | 35 20 20 20 20 20 2e 38 | 7.09  .|5     .8|
|000054f0| 20 20 20 2e 34 20 20 20 | 2e 37 20 20 20 2e 33 35 |   .4   |.7   .35|
|00005500| 20 20 2e 33 35 20 20 20 | 20 37 20 20 20 31 20 20 |  .35   | 7   1  |
|00005510| 20 36 20 20 20 33 20 20 | 20 2e 37 0d 69 31 33 20 | 6   3  | .7.i13 |
|00005520| 35 34 2e 37 37 20 20 36 | 20 20 20 20 38 30 20 20 |54.77  6|    80  |
|00005530| 20 37 2e 30 39 20 20 2e | 35 20 20 20 20 20 2e 38 | 7.09  .|5     .8|
|00005540| 20 20 20 2e 33 20 20 20 | 2e 37 20 20 20 2e 32 20 |   .3   |.7   .2 |
|00005550| 20 20 2e 34 20 20 20 20 | 20 36 20 20 20 31 20 20 |  .4    | 6   1  |
|00005560| 20 34 20 20 20 33 20 20 | 20 2e 36 0d 69 31 33 20 | 4   3  | .6.i13 |
|00005570| 35 36 2e 30 30 20 20 38 | 20 20 20 20 38 30 20 20 |56.00  8|    80  |
|00005580| 20 37 2e 30 39 20 20 2e | 35 20 20 20 20 20 2e 38 | 7.09  .|5     .8|
|00005590| 20 20 20 2e 33 20 20 20 | 2e 37 20 20 20 2e 32 20 |   .3   |.7   .2 |
|000055a0| 20 20 2e 34 20 20 20 20 | 20 36 20 20 20 31 20 20 |  .4    | 6   1  |
|000055b0| 20 35 20 20 20 33 20 20 | 20 2e 36 0d 27 27 27 0d | 5   3  | .6.'''.|
|000055c0| 0d 23 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.#------|--------|
|000055d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000055e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000055f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005600| 2d 2d 2d 7c 7c 7c 7c 7c | 7c 7c 7c 7c 7c 7c 7c 2d |---|||||||||||||-|
|00005610| 2d 0d 63 6c 61 73 73 20 | 69 6e 73 74 72 37 28 69 |-.class |instr7(i|
|00005620| 6e 73 74 72 53 68 65 6c | 6c 29 3a 0d 20 20 20 69 |nstrShel|l):.   i|
|00005630| 6e 75 6d 62 65 72 20 20 | 20 20 3d 20 37 0d 20 20 |number  |  = 7.  |
|00005640| 20 6e 61 6d 65 20 20 20 | 20 20 20 20 3d 20 27 77 | name   |    = 'w|
|00005650| 61 76 65 66 6f 72 6d 56 | 69 62 72 61 74 6f 27 0d |aveformV|ibrato'.|
|00005660| 20 20 20 69 6e 66 6f 20 | 20 20 20 20 20 20 3d 20 |   info |      = |
|00005670| 27 41 20 77 61 76 65 66 | 6f 72 6d 20 64 65 72 69 |'A wavef|orm deri|
|00005680| 76 65 64 20 69 6e 73 74 | 72 75 6d 65 6e 74 20 74 |ved inst|rument t|
|00005690| 68 61 74 20 68 61 73 20 | 76 69 62 72 61 74 6f 20 |hat has |vibrato |
|000056a0| 63 6f 6e 74 72 6f 6c 73 | 2e 27 0d 20 20 20 70 6d |controls|.'.   pm|
|000056b0| 74 72 46 69 65 6c 64 73 | 20 3d 20 31 34 20 23 20 |trFields| = 14 # |
|000056c0| 74 6f 74 61 6c 0d 20 20 | 20 70 6d 74 72 49 6e 66 |total.  | pmtrInf|
|000056d0| 6f 20 20 20 3d 20 7b 0d | 20 20 20 20 20 20 20 20 |o   = {.|        |
|000056e0| 20 20 20 20 20 20 20 20 | 20 27 70 6d 74 72 37 27 |        | 'pmtr7'|
|000056f0| 20 20 20 3a 20 27 61 74 | 74 61 63 6b 27 2c 0d 20 |   : 'at|tack',. |
|00005700| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005710| 27 70 6d 74 72 38 27 20 | 20 20 3a 20 27 72 65 6c |'pmtr8' |  : 'rel|
|00005720| 65 61 73 65 20 72 61 74 | 65 27 2c 0d 20 20 20 20 |ease rat|e',.    |
|00005730| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 27 70 6d |        |     'pm|
|00005740| 74 72 39 27 20 20 20 3a | 20 27 76 69 62 72 61 74 |tr9'   :| 'vibrat|
|00005750| 6f 20 64 65 70 74 68 27 | 2c 0d 20 20 20 20 20 20 |o depth'|,.      |
|00005760| 20 20 20 20 20 20 20 20 | 20 20 20 27 70 6d 74 72 |        |   'pmtr|
|00005770| 31 30 27 20 20 3a 20 27 | 76 69 62 72 61 74 6f 20 |10'  : '|vibrato |
|00005780| 64 65 6c 61 79 27 2c 0d | 20 20 20 20 20 20 20 20 |delay',.|        |
|00005790| 20 20 20 20 20 20 20 20 | 20 27 70 6d 74 72 31 31 |        | 'pmtr11|
|000057a0| 27 20 20 3a 20 27 76 69 | 62 72 61 74 6f 20 66 71 |'  : 'vi|brato fq|
|000057b0| 27 2c 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |',.     |        |
|000057c0| 20 20 20 20 27 70 6d 74 | 72 31 32 27 20 20 3a 20 |    'pmt|r12'  : |
|000057d0| 27 73 74 61 72 74 27 2c | 0d 20 20 20 20 20 20 20 |'start',|.       |
|000057e0| 20 20 20 20 20 20 20 20 | 20 20 27 70 6d 74 72 31 |        |  'pmtr1|
|000057f0| 33 27 20 20 3a 20 27 65 | 6e 64 27 2c 0d 20 20 20 |3'  : 'e|nd',.   |
|00005800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 27 70 |        |      'p|
|00005810| 6d 74 72 31 34 27 20 20 | 3a 20 27 78 74 69 6d 65 |mtr14'  |: 'xtime|
|00005820| 27 2c 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |',.     |        |
|00005830| 20 20 20 7d 20 23 20 68 | 6f 6c 64 73 20 64 69 73 |   } # h|olds dis|
|00005840| 63 72 69 70 74 69 6f 6e | 2c 20 70 72 65 73 65 74 |cription|, preset|
|00005850| 20 66 6f 72 20 65 61 63 | 68 20 70 6d 74 72 20 69 | for eac|h pmtr i|
|00005860| 6e 20 61 20 64 69 63 74 | 69 6f 6e 61 72 79 0d 20 |n a dict|ionary. |
|00005870| 20 20 64 65 66 61 75 6c | 74 20 20 20 20 3d 20 7b |  defaul|t    = {|
|00005880| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00005890| 20 20 27 72 68 79 74 68 | 6d 51 27 20 3a 20 28 28 |  'rhyth|mQ' : ((|
|000058a0| 39 2c 20 36 29 2c 20 28 | 39 2c 20 32 29 29 2c 20 |9, 6), (|9, 2)), |
|000058b0| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|000058c0| 20 20 27 6f 63 74 51 27 | 20 20 20 20 3a 20 28 5b |  'octQ'|    : ([|
|000058d0| 37 2c 38 5d 2c 20 20 20 | 27 72 61 6e 64 6f 6d 43 |7,8],   |'randomC|
|000058e0| 68 6f 69 63 65 27 29 2c | 0d 20 20 20 20 20 20 20 |hoice'),|.       |
|000058f0| 20 20 20 20 20 20 20 20 | 20 20 27 61 6d 70 51 27 |        |  'ampQ'|
|00005900| 20 20 20 20 3a 20 28 36 | 30 2c 37 30 2c 20 34 2c |    : (6|0,70, 4,|
|00005910| 20 27 6c 69 6e 65 61 72 | 44 6f 77 6e 27 29 20 2c | 'linear|Down') ,|
|00005920| 0d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00005930| 20 20 27 70 61 6e 51 27 | 20 20 20 20 3a 20 28 2e |  'panQ'|    : (.|
|00005940| 33 30 2c 20 2e 37 30 2c | 20 2e 30 38 2c 20 27 6c |30, .70,| .08, 'l|
|00005950| 69 6e 65 61 72 44 6f 77 | 6e 27 29 2c 20 0d 20 20 |inearDow|n'), .  |
|00005960| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 27 |        |       '|
|00005970| 70 6d 74 72 37 27 20 20 | 20 3a 20 28 31 2c 20 34 |pmtr7'  | : (1, 4|
|00005980| 2c 20 31 2c 20 27 6c 69 | 6e 65 61 72 55 70 27 29 |, 1, 'li|nearUp')|
|00005990| 2c 20 20 20 20 20 0d 20 | 20 20 20 20 20 20 20 20 |,     . |        |
|000059a0| 20 20 20 20 20 20 20 20 | 27 70 6d 74 72 38 27 20 |        |'pmtr8' |
|000059b0| 20 20 3a 20 28 32 2c 20 | 33 2c 20 31 2c 20 27 6c |  : (2, |3, 1, 'l|
|000059c0| 69 6e 65 61 72 55 70 27 | 29 2c 20 20 20 20 0d 20 |inearUp'|),    . |
|000059d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000059e0| 27 70 6d 74 72 39 27 20 | 20 20 3a 20 28 32 2c 20 |'pmtr9' |  : (2, |
|000059f0| 34 2c 20 31 2c 20 27 6c | 69 6e 65 61 72 55 70 27 |4, 1, 'l|inearUp'|
|00005a00| 29 2c 20 20 20 20 20 0d | 20 20 20 20 20 20 20 20 |),     .|        |
|00005a10| 20 20 20 20 20 20 20 20 | 20 27 70 6d 74 72 31 30 |        | 'pmtr10|
|00005a20| 27 20 20 3a 20 28 32 2c | 20 34 2c 20 31 2c 20 27 |'  : (2,| 4, 1, '|
|00005a30| 6c 69 6e 65 61 72 55 70 | 27 29 2c 20 20 20 20 20 |linearUp|'),     |
|00005a40| 20 20 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |  .     |        |
|00005a50| 20 20 20 20 27 70 6d 74 | 72 31 31 27 20 20 3a 20 |    'pmt|r11'  : |
|00005a60| 28 2e 32 2c 20 32 2c 20 | 2e 31 2c 20 27 6c 69 6e |(.2, 2, |.1, 'lin|
|00005a70| 65 61 72 55 70 44 6f 77 | 6e 27 29 2c 20 0d 20 20 |earUpDow|n'), .  |
|00005a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 27 |        |       '|
|00005a90| 70 6d 74 72 31 32 27 20 | 20 3a 20 28 31 2c 20 36 |pmtr12' | : (1, 6|
|00005aa0| 2c 20 31 2c 20 27 6c 69 | 6e 65 61 72 55 70 44 6f |, 1, 'li|nearUpDo|
|00005ab0| 77 6e 27 29 2c 20 20 20 | 0d 20 20 20 20 20 20 20 |wn'),   |.       |
|00005ac0| 20 20 20 20 20 20 20 20 | 20 20 27 70 6d 74 72 31 |        |  'pmtr1|
|00005ad0| 33 27 20 20 3a 20 28 31 | 2c 20 35 2c 20 31 2c 20 |3'  : (1|, 5, 1, |
|00005ae0| 27 6c 69 6e 65 61 72 55 | 70 44 6f 77 6e 27 29 2c |'linearU|pDown'),|
|00005af0| 20 20 20 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |   .    |        |
|00005b00| 20 20 20 20 20 27 70 6d | 74 72 31 34 27 20 20 3a |     'pm|tr14'  :|
|00005b10| 20 28 2e 36 2c 20 2e 38 | 2c 20 2e 30 31 2c 20 27 | (.6, .8|, .01, '|
|00005b20| 6c 69 6e 65 61 72 55 70 | 27 29 2c 20 20 0d 20 20 |linearUp|'),  .  |
|00005b30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 7d 20 |        |      } |
|00005b40| 0d 20 20 20 61 75 74 68 | 6f 72 20 20 20 20 20 3d |.   auth|or     =|
|00005b50| 20 27 27 20 23 20 61 74 | 74 72 69 62 75 74 69 6f | '' # at|tributio|
|00005b60| 6e 0d 20 20 20 6f 72 63 | 43 6f 64 65 20 3d 20 27 |n.   orc|Code = '|
|00005b70| 27 27 0d 69 6e 73 74 72 | 20 37 20 20 0d 20 20 20 |''.instr| 7  .   |
|00005b80| 69 70 61 6e 20 20 20 3d | 20 70 36 0d 20 20 20 20 |ipan   =| p6.    |
|00005b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005ba0| 20 20 20 20 20 20 0d 20 | 20 20 69 66 75 6e 63 31 |      . |  ifunc1|
|00005bb0| 20 3d 20 70 31 32 20 20 | 20 20 20 20 20 20 20 20 | = p12  |        |
|00005bc0| 20 20 20 20 20 20 20 20 | 20 20 3b 20 69 6e 69 74 |        |  ; init|
|00005bd0| 69 61 6c 20 77 61 76 65 | 66 6f 72 6d 0d 20 20 20 |ial wave|form.   |
|00005be0| 69 66 75 6e 63 32 20 3d | 20 70 31 33 20 20 20 20 |ifunc2 =| p13    |
|00005bf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005c00| 3b 20 63 72 6f 73 73 66 | 61 64 65 20 77 61 76 65 |; crossf|ade wave|
|00005c10| 66 6f 72 6d 0d 20 20 20 | 69 66 61 64 31 20 20 3d |form.   |ifad1  =|
|00005c20| 20 70 33 20 2d 20 28 70 | 31 34 20 2a 20 70 33 29 | p3 - (p|14 * p3)|
|00005c30| 20 20 20 20 20 20 20 20 | 3b 20 63 61 6c 63 75 6c |        |; calcul|
|00005c40| 61 74 65 20 69 6e 69 74 | 69 61 6c 20 66 61 64 65 |ate init|ial fade|
|00005c50| 0d 20 20 20 69 66 61 64 | 32 20 20 3d 20 70 33 20 |.   ifad|2  = p3 |
|00005c60| 2d 20 69 66 61 64 31 20 | 20 20 20 20 20 20 20 20 |- ifad1 |        |
|00005c70| 20 20 20 20 3b 20 63 61 | 6c 63 75 6c 61 74 65 20 |    ; ca|lculate |
|00005c80| 72 65 6d 61 69 6e 69 6e | 67 20 64 75 72 0d 20 20 |remainin|g dur.  |
|00005c90| 20 69 72 65 6c 20 20 20 | 3d 20 2e 31 20 20 20 20 | irel   |= .1    |
|00005ca0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005cb0| 20 3b 20 73 65 74 20 76 | 69 62 72 61 74 6f 20 72 | ; set v|ibrato r|
|00005cc0| 65 6c 65 61 73 65 0d 20 | 20 20 69 64 65 6c 31 20 |elease. |  idel1 |
|00005cd0| 20 3d 20 70 33 20 2d 20 | 28 70 31 31 20 2a 20 70 | = p3 - |(p11 * p|
|00005ce0| 33 29 20 20 20 20 20 20 | 20 20 3b 20 63 61 6c 63 |3)      |  ; calc|
|00005cf0| 75 6c 61 74 65 20 69 6e | 69 74 69 61 6c 20 64 65 |ulate in|itial de|
|00005d00| 6c 61 79 0d 20 20 20 69 | 73 75 73 20 20 20 3d 20 |lay.   i|sus   = |
|00005d10| 70 33 20 2d 20 28 69 64 | 65 6c 31 2d 20 69 72 65 |p3 - (id|el1- ire|
|00005d20| 6c 29 20 20 20 20 20 3b | 20 63 61 6c 63 75 6c 61 |l)     ;| calcula|
|00005d30| 74 65 20 72 65 6d 61 69 | 6e 69 6e 67 20 64 75 72 |te remai|ning dur|
|00005d40| 0d 20 20 20 69 61 6d 70 | 20 20 20 3d 20 61 6d 70 |.   iamp|   = amp|
|00005d50| 64 62 28 70 34 29 0d 20 | 20 20 69 73 63 61 6c 65 |db(p4). |  iscale|
|00005d60| 20 3d 20 69 61 6d 70 20 | 2a 20 2e 31 36 36 20 20 | = iamp |* .166  |
|00005d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005d80| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 20 70 34 |        |    ; p4|
|00005d90| 3d 61 6d 70 0d 20 20 20 | 69 6e 6f 74 65 20 20 3d |=amp.   |inote  =|
|00005da0| 20 63 70 73 70 63 68 28 | 70 35 29 20 20 20 20 20 | cpspch(|p5)     |
|00005db0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005dc0| 20 20 20 20 20 20 20 20 | 20 20 3b 20 70 35 3d 66 |        |  ; p5=f|
|00005dd0| 72 65 71 0d 20 20 20 0d | 20 20 20 6b 33 20 20 6c |req.   .|   k3  l|
|00005de0| 69 6e 73 65 67 20 20 20 | 20 30 2c 20 69 64 65 6c |inseg   | 0, idel|
|00005df0| 31 2c 20 70 31 30 2c 20 | 69 73 75 73 2c 20 70 31 |1, p10, |isus, p1|
|00005e00| 30 2c 20 69 72 65 6c 2c | 20 30 20 20 20 20 3b 20 |0, irel,| 0    ; |
|00005e10| 70 37 3d 61 74 74 61 63 | 6b 20 74 69 6d 65 0d 20 |p7=attac|k time. |
|00005e20| 20 20 6b 32 20 20 6f 73 | 63 69 6c 20 20 20 20 20 |  k2  os|cil     |
|00005e30| 6b 33 2c 20 70 39 2c 20 | 31 20 20 20 20 20 20 20 |k3, p9, |1       |
|00005e40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005e50| 20 20 20 3b 20 70 37 3d | 72 65 6c 65 61 73 65 20 |   ; p7=|release |
|00005e60| 74 69 6d 65 0d 20 20 20 | 6b 31 20 20 6c 69 6e 65 |time.   |k1  line|
|00005e70| 6e 20 20 20 20 20 69 73 | 63 61 6c 65 2c 20 70 37 |n     is|cale, p7|
|00005e80| 2c 20 70 33 2c 20 70 38 | 20 20 20 20 20 20 20 20 |, p3, p8|        |
|00005e90| 20 20 20 20 20 20 20 20 | 20 3b 20 70 39 3d 76 69 |        | ; p9=vi|
|00005ea0| 62 20 72 61 74 65 0d 20 | 20 20 61 36 20 20 6f 73 |b rate. |  a6  os|
|00005eb0| 63 69 6c 20 20 20 20 20 | 6b 31 2c 20 69 6e 6f 74 |cil     |k1, inot|
|00005ec0| 65 2a 2e 35 2b 6b 32 2c | 20 69 66 75 6e 63 32 20 |e*.5+k2,| ifunc2 |
|00005ed0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 20 70 31 30 |        |   ; p10|
|00005ee0| 3d 76 69 62 20 64 65 70 | 74 68 0d 20 20 20 61 35 |=vib dep|th.   a5|
|00005ef0| 20 20 6f 73 63 69 6c 20 | 20 20 20 20 6b 31 2c 20 |  oscil |    k1, |
|00005f00| 69 6e 6f 74 65 2a 31 2e | 32 35 2b 6b 32 2c 20 69 |inote*1.|25+k2, i|
|00005f10| 66 75 6e 63 32 20 20 20 | 20 20 20 20 20 20 20 3b |func2   |       ;|
|00005f20| 20 70 31 31 3d 76 69 62 | 20 64 65 6c 61 79 20 28 | p11=vib| delay (|
|00005f30| 30 2d 31 29 0d 20 20 20 | 61 34 20 20 6f 73 63 69 |0-1).   |a4  osci|
|00005f40| 6c 20 20 20 20 20 6b 31 | 2c 20 69 6e 6f 74 65 2b |l     k1|, inote+|
|00005f50| 6b 32 2c 20 69 66 75 6e | 63 32 20 20 20 20 20 20 |k2, ifun|c2      |
|00005f60| 20 20 20 20 20 20 20 20 | 20 3b 20 70 31 32 3d 69 |        | ; p12=i|
|00005f70| 6e 69 74 69 61 6c 20 77 | 61 76 65 0d 20 20 20 61 |nitial w|ave.   a|
|00005f80| 33 20 20 6f 73 63 69 6c | 20 20 20 20 20 6b 31 2c |3  oscil|     k1,|
|00005f90| 20 69 6e 6f 74 65 2a 2e | 39 39 37 2b 6b 32 2c 20 | inote*.|997+k2, |
|00005fa0| 69 66 75 6e 63 31 20 20 | 20 20 20 20 20 20 20 20 |ifunc1  |        |
|00005fb0| 3b 20 70 31 33 3d 63 72 | 6f 73 73 20 77 61 76 65 |; p13=cr|oss wave|
|00005fc0| 0d 20 20 20 61 32 20 20 | 6f 73 63 69 6c 20 20 20 |.   a2  |oscil   |
|00005fd0| 20 20 6b 31 2c 20 69 6e | 6f 74 65 2a 31 2e 30 30 |  k1, in|ote*1.00|
|00005fe0| 33 2b 6b 32 2c 20 69 66 | 75 6e 63 31 20 20 20 20 |3+k2, if|unc1    |
|00005ff0| 20 20 20 20 20 3b 20 70 | 31 34 3d 66 61 64 65 20 |     ; p|14=fade |
|00006000| 74 69 6d 65 20 28 30 2d | 31 29 0d 20 20 20 61 31 |time (0-|1).   a1|
|00006010| 20 20 6f 73 63 69 6c 20 | 20 20 20 20 6b 31 2c 20 |  oscil |    k1, |
|00006020| 69 6e 6f 74 65 2b 6b 32 | 2c 20 69 66 75 6e 63 31 |inote+k2|, ifunc1|
|00006030| 20 20 20 0d 20 20 20 20 | 20 20 20 20 20 20 20 20 |   .    |        |
|00006040| 20 0d 20 20 20 6b 66 61 | 64 65 20 20 6c 69 6e 73 | .   kfa|de  lins|
|00006050| 65 67 20 31 2c 20 69 66 | 61 64 31 2c 20 30 2c 20 |eg 1, if|ad1, 0, |
|00006060| 69 66 61 64 32 2c 20 31 | 0d 20 20 20 61 66 75 6e |ifad2, 1|.   afun|
|00006070| 63 31 20 3d 20 6b 66 61 | 64 65 20 2a 20 28 61 31 |c1 = kfa|de * (a1|
|00006080| 2b 61 32 2b 61 33 29 0d | 20 20 20 61 66 75 6e 63 |+a2+a3).|   afunc|
|00006090| 32 20 3d 20 28 31 20 2d | 20 6b 66 61 64 65 29 20 |2 = (1 -| kfade) |
|000060a0| 2a 20 28 61 34 2b 61 35 | 2b 61 36 29 0d 0d 20 20 |* (a4+a5|+a6)..  |
|000060b0| 20 61 4d 69 78 53 69 67 | 20 20 20 20 20 20 20 20 | aMixSig|        |
|000060c0| 20 3d 20 28 61 66 75 6e | 63 31 20 2b 20 61 66 75 | = (afun|c1 + afu|
|000060d0| 6e 63 32 29 0d 27 27 27 | 0d 20 20 20 73 63 6f 53 |nc2).'''|.   scoS|
|000060e0| 61 6d 70 6c 65 20 3d 20 | 27 27 27 0d 0d 3b 70 31 |ample = |'''..;p1|
|000060f0| 20 20 20 70 32 20 20 20 | 20 70 33 20 20 20 70 34 |   p2   | p3   p4|
|00006100| 20 20 20 70 35 20 20 20 | 20 20 70 36 20 20 20 70 |   p5   |  p6   p|
|00006110| 37 20 20 20 70 38 20 20 | 20 70 39 20 20 20 20 70 |7   p8  | p9    p|
|00006120| 31 30 20 20 20 20 70 31 | 31 20 20 20 20 70 31 32 |10    p1|1    p12|
|00006130| 20 20 20 20 70 31 33 20 | 20 70 31 34 0d 3b 69 6e |    p13 | p14.;in|
|00006140| 73 74 20 73 74 61 72 74 | 20 64 75 72 20 20 61 6d |st start| dur  am|
|00006150| 70 20 20 66 72 65 71 20 | 20 20 70 61 6e 20 20 61 |p  freq |  pan  a|
|00006160| 74 6b 20 20 72 65 6c 73 | 20 76 69 62 20 20 20 76 |tk  rels| vib   v|
|00006170| 69 62 20 20 20 76 69 62 | 20 20 20 20 73 74 61 72 |ib   vib|    star|
|00006180| 74 20 20 65 6e 64 20 20 | 78 74 69 6d 65 0d 3b 20 |t  end  |xtime.; |
|00006190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 28 64 |        |      (d|
|000061a0| 62 73 29 20 28 70 63 68 | 29 20 20 20 20 20 20 20 |bs) (pch|)       |
|000061b0| 20 20 20 20 72 61 74 65 | 20 20 64 65 70 74 68 20 |    rate|  depth |
|000061c0| 64 65 6c 61 79 20 20 28 | 66 29 0d 69 37 20 20 20 |delay  (|f).i7   |
|000061d0| 20 35 33 20 20 20 20 31 | 34 20 20 20 39 35 20 20 | 53    1|4   95  |
|000061e0| 20 38 2e 30 34 20 20 2e | 35 20 20 20 33 20 20 20 | 8.04  .|5   3   |
|000061f0| 33 20 20 20 20 32 20 20 | 20 20 20 34 20 20 20 20 |3    2  |   4    |
|00006200| 20 2e 34 20 20 20 20 20 | 31 20 20 20 20 20 20 35 | .4     |1      5|
|00006210| 20 20 20 20 2e 38 20 0d | 69 37 20 20 20 20 35 35 |    .8 .|i7    55|
|00006220| 20 20 20 20 31 32 20 20 | 20 39 35 20 20 20 38 2e |    12  | 95   8.|
|00006230| 30 33 20 20 2e 35 20 20 | 20 32 20 20 20 33 20 20 |03  .5  | 2   3  |
|00006240| 20 20 34 20 20 20 20 20 | 33 20 20 20 20 20 2e 34 |  4     |3     .4|
|00006250| 20 20 20 20 20 36 20 20 | 20 20 20 20 31 20 20 20 |     6  |    1   |
|00006260| 20 2e 38 0d 27 27 27 0d | 0d 23 2d 2d 2d 2d 2d 2d | .8.'''.|.#------|
|00006270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006290| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000062a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 7c 7c 7c 7c 7c |--------|---||||||
|000062b0| 7c 7c 7c 7c 7c 7c 7c 2d | 2d 0d 63 6c 61 73 73 20 ||||||||-|-.class |
|000062c0| 69 6e 73 74 72 39 28 69 | 6e 73 74 72 53 68 65 6c |instr9(i|nstrShel|
|000062d0| 6c 29 3a 0d 20 20 20 69 | 6e 75 6d 62 65 72 20 20 |l):.   i|number  |
|000062e0| 20 20 20 3d 20 39 0d 20 | 20 20 6e 61 6d 65 20 20 |   = 9. |  name  |
|000062f0| 20 20 20 20 20 3d 20 27 | 61 64 64 69 74 69 76 65 |     = '|additive|
|00006300| 42 65 6c 6c 43 6c 65 61 | 72 27 0d 20 20 20 69 6e |BellClea|r'.   in|
|00006310| 66 6f 20 20 20 20 20 20 | 20 3d 20 27 41 20 73 69 |fo      | = 'A si|
|00006320| 6d 70 6c 65 20 62 65 6c | 6c 20 6d 61 64 65 20 77 |mple bel|l made w|
|00006330| 69 74 68 20 31 32 20 70 | 61 72 74 69 61 6c 73 2c |ith 12 p|artials,|
|00006340| 20 65 61 63 68 20 77 69 | 74 68 20 74 68 65 69 72 | each wi|th their|
|00006350| 20 6f 77 6e 20 65 6e 76 | 65 6c 6f 70 65 2c 20 74 | own env|elope, t|
|00006360| 68 65 6e 20 6d 69 78 65 | 64 20 74 6f 67 65 74 68 |hen mixe|d togeth|
|00006370| 65 72 2e 20 42 61 73 65 | 64 20 6f 6e 20 64 65 73 |er. Base|d on des|
|00006380| 69 67 6e 20 62 79 20 43 | 2e 20 52 69 73 73 65 74 |ign by C|. Risset|
|00006390| 2e 27 0d 20 20 20 70 6d | 74 72 46 69 65 6c 64 73 |.'.   pm|trFields|
|000063a0| 20 3d 20 36 20 23 20 74 | 68 69 73 20 69 73 20 74 | = 6 # t|his is t|
|000063b0| 68 65 20 62 61 73 65 20 | 6e 75 6d 62 65 72 0d 20 |he base |number. |
|000063c0| 20 20 70 6d 74 72 49 6e | 66 6f 20 20 20 3d 20 7b |  pmtrIn|fo   = {|
|000063d0| 7d 20 23 20 68 6f 6c 64 | 73 20 64 69 73 63 72 69 |} # hold|s discri|
|000063e0| 70 74 69 6f 6e 2c 20 70 | 72 65 73 65 74 20 66 6f |ption, p|reset fo|
|000063f0| 72 20 65 61 63 68 20 70 | 6d 74 72 20 69 6e 20 61 |r each p|mtr in a|
+--------+-------------------------+-------------------------+--------+--------+